Your requested file: '.$finfo.'
'.$message.'
	Powered by kPlaylist

'; } ?>

'.$msg.'
	<?php echo $this->message; ?>

 block so the print_r's are readable.
// define('ID3_SHOW_DEBUG', true);

class id3 {
    /*
     * id3 - A Class for reading/writing MP3 ID3 tags
     * 
     * By Sandy McArthur, Jr. 
     * 
     * Copyright 2001 (c) All Rights Reserved, All Responsibility Yours
     *
     * This code is released under the GNU LGPL Go read it over here:
     * http://www.gnu.org/copyleft/lesser.html
     * 
     * I do make one optional request, I would like an account on or a
     * copy of where this code is used. If that is not possible then
     * an email would be cool.
     * 
     * Warning: I really hope this doesn't mess up your MP3s but you
     * are on your own if bad things happen.
     *
     * Note: This code doesn't try to deal with corrupt mp3s. So if you get
     * incorrect length times or something else it may be your mp3. To fix just
     * re-enocde from the CD. :~)
     * 
     * To use this code first create a id3 object passing the path to the mp3 as the first
     * parameter. Then just access the ID3 fields directly (look below for their names).
     * If you want to update a tag just change the fields and then $id3->write();
     * The methods designed for general use are study(), write(), copy($from), remove(),
     * and genres(). Please read the comment before each method for the specifics of each.
     *
     * eg:
     * 	require_once('class.id3.php');
     *	$id3 = new id3('/path/to/our lady peace - middle of yesterday.mp3');
     *  echo $id3->artists, ' - ', $id3->name;
     *	$id3->comment = 'Go buy some OLP CDs, they rock!';
     *	$id3->write();
     *
     * Change Log:
     *	1.24:	Small change to the write() method because the old way it worked was poorly
     *		thought out. The new write() method has optional parameters. $id3->frameoffset
     *		added which will have the byte offset of the first mpeg frame and $id3->filesize
     *	1.23:	MPEG Frame pasrsion code should be perfect on everything but VBR mp3's.
     *	1.20:	Reimplemented most of the mpeg frame parsing code plus a whole lot more.
     *	1.10:	ID3v1 and v1.1 functionality completed.
     *	1.00:	Decided to rewrite and correct all my poor choices and to implement ID3v1.1
     *		Looking at my old code I'm ashamed I ever released it and called it functional.
     * 
     * TODO:
     *	Implement ID3v2 reader and maybe writer if enought people want it.
     * 
     * The most recent version is available at:
     *	http://Leknor.com/code/
     *
     */

 
    /*
     * id3 constructor - creates a new id3 object and maybe loads a tag
     * from a file.
     *
     * $file - the path to the mp3/mpeg file. When in doubt use a full path.
     * $study - (Optional) - study the mpeg frame to get extra info like bitrate and frequency
     *		You should advoid studing alot of files as it will siginficantly slow this down.
     */
    function id3($file, $study = false) 
	{
	
		$this->_version = 1.24; // Version of the id3 class
		$this->file = false;		// mp3/mpeg file name
		$this->id3v1 = false;		// ID3 v1 tag found? (also true if v1.1 found)
		$this->id3v11 = false;	// ID3 v1.1 tag found?
		$this->id3v2 = false;		// ID3 v2 tag found? (not used yet)
    // ID3v1.1 Fields:
		$this->name = '';		// track name
		$this->artists = '';		// artists
		$this->album = '';		// album
		$this->year = '';		// year
		$this->comment = '';		// comment
		$this->track = 0;		// track number
		$this->genre = '';		// genre name
		$this->genreno = 255;		// genre number
    // MP3 Frame Stuff
		$this->studied = false;	// Was the file studied to learn more info?
		$this->mpeg_ver = false;	// version of mpeg
		$this->layer = false;		// version of layer
		$this->bitrate = false;	// bitrate
		$this->crc = false;		// Frames are crc protected?
		$this->frequency = 0;		// Frequency
		$this->padding = false;	// Frames padded
		$this->private = false;	// Private bit set?
		$this->mode = '';		// Mode (Stereo etc)
		$this->copyright = false;	// Copyrighted?
		$this->original = false;	// On Original Media? (never used)
		$this->emphasis = '';		// Emphasis (also never used)
		$this->filesize = -1;		// Bytes in file
		$this->frameoffset = -1;	// Byte at which the first mpeg header was found.
		$this->length = false;	// length of mp3 format hh:ss
		$this->lengths = false;	// length of mp3 in seconds
		$this->error = false;		// if any errors they will be here
		$this->debug = false;		// print debugging info?
		$this->debugbeg = '
';
		$this->debugend = '
';
	
	
	if (defined('ID3_SHOW_DEBUG')) $this->debug = true;
	if ($this->debug) print($this->debugbeg . "id3('$file')
\n");

	if (!empty($file))	
	{
		$this->file = $file;
		$this->_read_v1();

		if ($study or defined('ID3_AUTO_STUDY'))
		 $this->study();

		if ($this->debug) print($this->debugend);
	}
	} // id3($file)

    /*
     * write - update the id3v1 tags on the file.
     *
     * $v1 - if true update/create an id3v1 tag on the file. (defaults to true)
     *
     * Note: If/when ID3v2 is implemented this method will probably get another
     *       parameters.
     */
    function write($v1 = true) {
	if ($this->debug) print($this->debugbeg . "write()
\n");
	if ($v1) {
	    $this->_write_v1();
	}
	if ($this->debug) print($this->debugend);
    } // write()

    /*
     * study() - does extra work to get the MPEG frame info.
     */
    function study() {
	$this->studied = true;
	$this->_readframe();
    } // study()

    /*
     * copy($from) - set's the ID3 fields to the same as the fields in $from
     */
    function copy($from) {
	if ($this->debug) print($this->debugbeg . "copy(\$from)
\n");
	$this->name	= $from->name;
	$this->artists	= $from->artists;
	$this->album	= $from->album;
	$this->year	= $from->year;
	$this->comment	= $from->comment;
	$this->track	= $from->track;
	$this->genre	= $from->genre;
	$this->genreno	= $from->genreno;
	if ($this->debug) print($this->debugend);
    } // copy($from)

    /*
     * remove - removes the id3 tag(s) from a file.
     *
     * $id3v1 - true to remove the tag
     * $id3v2 - true to remove the tag (Not yet implemented)
     */
    function remove($id3v1 = true, $id3v2 = true) {
	if ($this->debug) print($this->debugbeg . "remove()
\n");

	if ($id3v1) {
	    $this->_remove_v1();
	}

	if ($id3v2) {
	    // TODO: write ID3v2 code
	}

	if ($this->debug) print($this->debugend);
    } // remove


    /*
     * _read_v1 - read a ID3 v1 or v1.1 tag from a file
     *
     * $file should be the path to the mp3 to look for a tag.
     * When in doubt use the full path.
     *
     * if there is an error it will return false and a message will be
     * put in $this->error
     */
    function _read_v1() {
	if ($this->debug) print($this->debugbeg . "_read_v1()
\n");

	if (! ($f = fopen($this->file, 'rb')) ) {
	    $this->error = 'Unable to open ' . $file;
	    return false;
	}

	if (fseek($f, -128, SEEK_END) == -1) {
	    $this->error = 'Unable to see to end - 128 of ' . $this->file;
	    return false;
	}

	$r = fread($f, 128);
	fclose($f);

	if ($this->debug) {
	    $unp = unpack('H*raw', $r);
	    print_r($unp);
	}

	$id3tag = $this->_decode_v1($r);

	if($id3tag) {
	    $this->id3v1 = true;

	    $tmp = explode(Chr(0), $id3tag['NAME']);
	    $this->name = $tmp[0];

	    $tmp = explode(Chr(0), $id3tag['ARTISTS']);
	    $this->artists = $tmp[0];

	    $tmp = explode(Chr(0), $id3tag['ALBUM']);
	    $this->album = $tmp[0];

	    $tmp = explode(Chr(0), $id3tag['YEAR']);
	    $this->year = $tmp[0];

	    $tmp = explode(Chr(0), $id3tag['COMMENT']);
	    $this->comment = $tmp[0];

	    if (isset($id3tag['TRACK'])) {
		$this->id3v11 = true;
		$this->track = $id3tag['TRACK'];
	    }

	    $this->genreno = $id3tag['GENRENO'];
	    $this->genre = $id3tag['GENRE'];
	}

	if ($this->debug) print($this->debugend);
    } // _read_v1()

    /*
     * _decode_v1 - decodes that ID3v1 or ID3v1.1 tag
     *
     * false will be returned if there was an error decoding the tag
     * else an array will be returned
     */
    function _decode_v1($rawtag) {
	if ($this->debug) print($this->debugbeg . "_decode_v1(\$rawtag)
\n");

	if ($rawtag[125] == Chr(0) and $rawtag[126] != Chr(0)) {
	    // ID3 v1.1
	    $format = 'a3TAG/a30NAME/a30ARTISTS/a30ALBUM/a4YEAR/a28COMMENT/x1/C1TRACK/C1GENRENO';
	} else {
	    // ID3 v1
	    $format = 'a3TAG/a30NAME/a30ARTISTS/a30ALBUM/a4YEAR/a30COMMENT/C1GENRENO';
	}

	$id3tag = unpack($format, $rawtag);
	if ($this->debug) print_r($id3tag);

	if ($id3tag['TAG'] == 'TAG') {
	    $id3tag['GENRE'] = $this->getgenre($id3tag['GENRENO']);
	} else {
	    $this->error = 'TAG not found';
	    $id3tag = false;
	}
	if ($this->debug) print($this->debugend);
	return $id3tag;
    } // _decode_v1()


    /*
     * _write_v1 - writes a ID3 v1 or v1.1 tag to a file
     *
     * if there is an error it will return false and a message will be
     * put in $this->error
     */
    function _write_v1() {
	if ($this->debug) print($this->debugbeg . "_write_v1()
\n");

	$file = $this->file;

	if (! ($f = fopen($file, 'r+b')) ) {
	    $this->error = 'Unable to open ' . $file;
	    return false;
	}

	if (fseek($f, -128, SEEK_END) == -1) {
	    $this->error = 'Unable to see to end - 128 of ' . $file;
	    return false;
	}

	$this->genreno = $this->getgenreno($this->genre, $this->genreno);

	$newtag = $this->_encode_v1();

	$r = fread($f, 128);

	if ($this->_decode_v1($r)) {
	    if (fseek($f, -128, SEEK_END) == -1) {
		$this->error = 'Unable to see to end - 128 of ' . $file;
		return false;
	    }
	    fwrite($f, $newtag);
	} else {
	    if (fseek($f, 0, SEEK_END) == -1) {
		$this->error = 'Unable to see to end of ' . $file;
		return false;
	    }
	    fwrite($f, $newtag);
	}
	fclose($f);


	if ($this->debug) print($this->debugend);
    } // _write_v1()

    /*
     * _encode_v1 - encode the ID3 tag
     *
     * the newly built tag will be returned
     */
    function _encode_v1() {
	if ($this->debug) print($this->debugbeg . "_encode_v1()
\n");

	if ($this->track) {
	    // ID3 v1.1
	    $id3pack = 'a3a30a30a30a4a28x1C1C1';
	    $newtag = pack($id3pack,
		    'TAG',
		    $this->name,
		    $this->artists,
		    $this->album,
		    $this->year,
		    $this->comment,
		    $this->track,
		    $this->genreno
			  );
	} else {
	    // ID3 v1
	    $id3pack = 'a3a30a30a30a4a30C1';
	    $newtag = pack($id3pack,
		    'TAG',
		    $this->name,
		    $this->artists,
		    $this->album,
		    $this->year,
		    $this->comment,
		    $this->genreno
			  );
	}

	if ($this->debug) {
	    print('id3pack: ' . $id3pack . "\n");
	    $unp = unpack('H*new', $newtag);
	    print_r($unp);
	}

	if ($this->debug) print($this->debugend);
	return $newtag;
    } // _encode_v1()

    /*
     * _remove_v1 - if exists it removes an ID3v1 or v1.1 tag
     *
     * returns true if the tag was removed or none was found
     * else false if there was an error
     */
    function _remove_v1() {
	if ($this->debug) print($this->debugbeg . "_remove_v1()
\n");

	$file = $this->file;

	if (! ($f = fopen($file, 'r+b')) ) {
	    $this->error = 'Unable to open ' . $file;
	    return false;
	}

	if (fseek($f, -128, SEEK_END) == -1) {
	    $this->error = 'Unable to see to end - 128 of ' . $file;
	    return false;
	}

	$r = fread($f, 128);

	$success = false;
	if ($this->_decode_v1($r)) {
	    $size = filesize($this->file) - 128;
	    if ($this->debug) print('size: old: ' . filesize($this->file));
	    $success = ftruncate($f, $size);	
	    clearstatcache();
	    if ($this->debug) print(' new: ' . filesize($this->file));
	}
	fclose($f);
	if ($this->debug) print($this->debugend);
	return $success;
    } // _remove_v1()

    function _readframe() {
	if ($this->debug) print($this->debugbeg . "_readframe()
\n");

	$file = $this->file;

	if (! ($f = fopen($file, 'rb')) ) {
	    $this->error = 'Unable to open ' . $file;
	    if ($this->debug) print($this->debugend);
	    return false;
	}

	$this->filesize = filesize($file);

	do {
	    while (fread($f,1) != Chr(255)) { // Find the first frame
		//if ($this->debug) echo "Find...\n";
		if (feof($f)) {
		    $this->error = 'No mpeg frame found';
		    if ($this->debug) print($this->debugend);
		    return false;
		}
	    }
	    fseek($f, ftell($f) - 1); // back up one byte

	    $frameoffset = ftell($f);

	    $r = fread($f, 4);
	    // Binary to Hex to a binary sting. ugly but best I can think of.
	    $bits = @unpack('H*bits', $r);
	    $bits =  base_convert($bits['bits'],16,2);
	} while (!$bits[8] and !$bits[9] and !$bits[10]); // 1st 8 bits true from the while
	if ($this->debug) print('Bits: ' . $bits . "\n");

	$this->frameoffset = $frameoffset;

	fclose($f);

	if ($bits[11] == 0) {
	    $this->mpeg_ver = "2.5";
	    $bitrates = array(
		    '1' => array(0, 32, 48, 56, 64, 80, 96, 112, 128, 144, 160, 176, 192, 224, 256, 0),
		    '2' => array(0,  8, 16, 24, 32, 40, 48,  56,  64,  80,  96, 112, 128, 144, 160, 0),
		    '3' => array(0,  8, 16, 24, 32, 40, 48,  56,  64,  80,  96, 112, 128, 144, 160, 0),
			     );
	} else if ($bits[12] == 0) {
	    $this->mpeg_ver = "2";
	    $bitrates = array(
		    '1' => array(0, 32, 48, 56, 64, 80, 96, 112, 128, 144, 160, 176, 192, 224, 256, 0),
		    '2' => array(0,  8, 16, 24, 32, 40, 48,  56,  64,  80,  96, 112, 128, 144, 160, 0),
		    '3' => array(0,  8, 16, 24, 32, 40, 48,  56,  64,  80,  96, 112, 128, 144, 160, 0),
			     );
	} else {
	    $this->mpeg_ver = "1";
	    $bitrates = array(
		    '1' => array(0, 32, 64, 96, 128, 160, 192, 224, 256, 288, 320, 352, 384, 416, 448, 0),
		    '2' => array(0, 32, 48, 56,  64,  80,  96, 112, 128, 160, 192, 224, 256, 320, 384, 0),
		    '3' => array(0, 32, 40, 48,  56,  64,  80,  96, 112, 128, 160, 192, 224, 256, 320, 0),
			     );
	}
	if ($this->debug) print('MPEG' . $this->mpeg_ver . "\n");

	$layer = array(
		array(0,3),
		array(2,1),
		      );
	$this->layer = $layer[$bits[13]][$bits[14]];
	if ($this->debug) print('layer: ' . $this->layer . "\n");

	if ($bits[15] == 0) {
	    // It's backwards, if the bit is not set then it is protected.
	    if ($this->debug) print("protected (crc)\n");
	    $this->crc = true;
	}

	$bitrate = 0;
	if ($bits[16] == 1) $bitrate += 8;
	if ($bits[17] == 1) $bitrate += 4;
	if ($bits[18] == 1) $bitrate += 2;
	if ($bits[19] == 1) $bitrate += 1;
	$this->bitrate = @$bitrates[$this->layer][$bitrate];

	$frequency = array(
		'1' => array(
		    '0' => array(44100, 48000),
		    '1' => array(32000, 0),
			    ),
		'2' => array(
		    '0' => array(22050, 24000),
		    '1' => array(16000, 0),
			    ),
		'2.5' => array(
		    '0' => array(11025, 12000),
		    '1' => array(8000, 0),
			      ),
		  );
	$this->frequency = $frequency[$this->mpeg_ver][$bits[20]][$bits[21]];

	$this->padding = $bits[22];
	$this->private = $bits[23];

	$mode = array(
		array('Stereo', 'Joint Stereo'),
		array('Dual Channel', 'Mono'),
		     );
	$this->mode = $mode[$bits[24]][$bits[25]];

	// XXX: I dunno what the mode extension is for bits 26,27

	$this->copyright = $bits[28];
	$this->original = $bits[29];

	$emphasis = array(
		array('none', '50/15ms'),
		array('', 'CCITT j.17'),
			 );
	$this->emphasis = $emphasis[$bits[30]][$bits[31]];

	if ($this->bitrate == 0) {
	    $s = -1;
	} else {
	    $s = ((8*filesize($this->file))/1000) / $this->bitrate;        
	}
	$this->length = sprintf('%02d:%02d',floor($s/60),floor($s-(floor($s/60)*60)));
	$this->lengths = (int)$s;

	if ($this->debug) print($this->debugend);
    } // _readframe()

    /*
     * getgenre - return the name of a genre number
     *
     * if no genre number is specified the genre number from
     * $this->genreno will be used.
     *
     * the genre is returned or false if an error or not found
     * no error message is ever returned
     */
    function getgenre($genreno) {
	if ($this->debug) print($this->debugbeg . "getgenre($genreno)
\n");

	$genres = $this->genres();
	if (isset($genres[$genreno])) {
	    $genre = $genres[$genreno];
	    if ($this->debug) print($genre . "\n");
	} else {
	    $genre = '';
	}

	if ($this->debug) print($this->debugend);
	return $genre;
    } // getgenre($genreno)

    /*
     * getgenreno - return the number of the genre name
     *
     * the genre number is returned or 0xff (255) if a match is not found
     * you can specify the default genreno to use if one is not found
     * no error message is ever returned
     */
    function getgenreno($genre, $default = 0xff) {
	if ($this->debug) print($this->debugbeg . "getgenreno('$genre',$default)
\n");

	$genres = $this->genres();
	$genreno = false;
	if ($genre) {
	    foreach ($genres as $no => $name) {
		if (strtolower($genre) == strtolower($name)) {
		    if ($this->debug) print("$no:'$name' == '$genre'");
		    $genreno = $no;
		}
	    }
	}
	if ($genreno === false) $genreno = $default;
	if ($this->debug) print($this->debugend);
	return $genreno;
    } // getgenreno($genre, $default = 0xff)

    /*
     * genres - reuturns an array of the ID3v1 genres
     */
    function genres() {
	return array(
		0   => 'Blues',
		1   => 'Classic Rock',
		2   => 'Country',
		3   => 'Dance',
		4   => 'Disco',
		5   => 'Funk',
		6   => 'Grunge',
		7   => 'Hip-Hop',
		8   => 'Jazz',
		9   => 'Metal',
		10  => 'New Age',
		11  => 'Oldies',
		12  => 'Other',
		13  => 'Pop',
		14  => 'R&B',
		15  => 'Rap',
		16  => 'Reggae',
		17  => 'Rock',
		18  => 'Techno',
		19  => 'Industrial',
		20  => 'Alternative',
		21  => 'Ska',
		22  => 'Death Metal',
		23  => 'Pranks',
		24  => 'Soundtrack',
		25  => 'Euro-Techno',
		26  => 'Ambient',
		27  => 'Trip-Hop',
		28  => 'Vocal',
		29  => 'Jazz+Funk',
		30  => 'Fusion',
		31  => 'Trance',
		32  => 'Classical',
		33  => 'Instrumental',
		34  => 'Acid',
		35  => 'House',
		36  => 'Game',
		37  => 'Sound Clip',
		38  => 'Gospel',
		39  => 'Noise',
		40  => 'Alternative Rock',
		41  => 'Bass',
		42  => 'Soul',
		43  => 'Punk',
		44  => 'Space',
		45  => 'Meditative',
		46  => 'Instrumental Pop',
		47  => 'Instrumental Rock',
		48  => 'Ethnic',
		49  => 'Gothic',
		50  => 'Darkwave',
		51  => 'Techno-Industrial',
		52  => 'Electronic',
		53  => 'Pop-Folk',
		54  => 'Eurodance',
		55  => 'Dream',
		56  => 'Southern Rock',
		57  => 'Comedy',
		58  => 'Cult',
		59  => 'Gangsta',
		60  => 'Top 40',
		61  => 'Christian Rap',
		62  => 'Pop/Funk',
		63  => 'Jungle',
		64  => 'Native US',
		65  => 'Cabaret',
		66  => 'New Wave',
		67  => 'Psychadelic',
		68  => 'Rave',
		69  => 'Showtunes',
		70  => 'Trailer',
		71  => 'Lo-Fi',
		72  => 'Tribal',
		73  => 'Acid Punk',
		74  => 'Acid Jazz',
		75  => 'Polka',
		76  => 'Retro',
		77  => 'Musical',
		78  => 'Rock & Roll',
		79  => 'Hard Rock',
		80  => 'Folk',
		81  => 'Folk-Rock',
		82  => 'National Folk',
		83  => 'Swing',
		84  => 'Fast Fusion',
		85  => 'Bebob',
		86  => 'Latin',
		87  => 'Revival',
		88  => 'Celtic',
		89  => 'Bluegrass',
		90  => 'Avantgarde',
		91  => 'Gothic Rock',
		92  => 'Progressive Rock',
		93  => 'Psychedelic Rock',
		94  => 'Symphonic Rock',
		95  => 'Slow Rock',
		96  => 'Big Band',
		97  => 'Chorus',
		98  => 'Easy Listening',
		99  => 'Acoustic',
		100 => 'Humour',
		101 => 'Speech',
		102 => 'Chanson',
		103 => 'Opera',
		104 => 'Chamber Music',
		105 => 'Sonata',
		106 => 'Symphony',
		107 => 'Booty Bass',
		108 => 'Primus',
		109 => 'Porn Groove',
		110 => 'Satire',
		111 => 'Slow Jam',
		112 => 'Club',
		113 => 'Tango',
		114 => 'Samba',
		115 => 'Folklore',
		116 => 'Ballad',
		117 => 'Power Ballad',
		118 => 'Rhytmic Soul',
		119 => 'Freestyle',
		120 => 'Duet',
		121 => 'Punk Rock',
		122 => 'Drum Solo',
		123 => 'Acapella',
		124 => 'Euro-House',
		125 => 'Dance Hall',
		126 => 'Goa',
		127 => 'Drum & Bass',
		128 => 'Club-House',
		129 => 'Hardcore',
		130 => 'Terror',
		131 => 'Indie',
		132 => 'BritPop',
		133 => 'Negerpunk',
		134 => 'Polsk Punk',
		135 => 'Beat',
		136 => 'Christian Gangsta Rap',
		137 => 'Heavy Metal',
		138 => 'Black Metal',
		139 => 'Crossover',
		140 => 'Contemporary Christian',
		141 => 'Christian Rock',
		142 => 'Merengue',
		143 => 'Salsa',
		144 => 'Trash Metal',
		145 => 'Anime',
		146 => 'Jpop',
		147 => 'Synthpop'
		    );
    } // genres
} // end of id3


// THIS IS BETA. DO NOT USE UNLESS YOU ENJOY THE RISK OF VERY BAD THINGS
// HAPPENING TO YOUR DATA. That said, it doesn't write anything so it
// should be harmless. This has been tested on a few ogg files I've
// created for testing but that is it.

// Uncomment the following define if you want tons of debgging info.
// Tip: make sure you use a 
 block so the print_r's are readable.
// define('OGG_SHOW_DEBUG', true);

class ogg {
    /*
     * ogg - A Class for reading Ogg comment tags
     * 
     * By Sandy McArthur, Jr. 
     * 
     * Copyright 2001 (c) All Rights Reserved, All Responsibility Yours
     *
     * This code is released under the GNU LGPL Go read it over here:
     * http://www.gnu.org/copyleft/lesser.html
     * 
     * I do make one optional request, I would like an account on or a
     * copy of where this code is used. If that is not possible then
     * an email would be cool.
     * 
     * Warning: I really hope this doesn't mess up your Ogg files but you
     * are on your own if bad things happen.
     *
     * To use this code first create a new instance on a file. Then loop
     * though the $ogg->fields array. Inside that loop, loop again. The
     * ogg comment format allows mome then one field with the same name
     * so it is possible for the ARTIST fields to appear twice if a work
     * has two performers.
     *
     * eg:
     *	require_once('class.ogg.php');
     *	$ogg = new ogg('/path/to/filename.ogg');
     *	echo '
';
     *	foreach ($ogg->fields AS $name => $val) {
     *	    echo "
$name:
";
     *	    foreach ($val AS $contents) {
     *		echo '
', $contents;
     *	    }
     *	    echo '
';
     *	}
     *	echo '
';
     *
     * This site was useful to me:
     *	http://www.xiph.org/ogg/vorbis/docs.html
     *
     * Change Log:
     *	0.10:	Clean up for release.
     *	0.01:	Got off my ass and wrote something until it works enough.
     * 
     * Thanks To:
     *
     * TODO:
     *	Collect nifty info like bitrate, etc...
     *	Maybe implement ogg comment writer. We'll see I don't like using php
     *	    to manipulate large amounts of data.
     * 
     * The most recent version is available at:
     *	http://Leknor.com/code/
     *
     */

    /*
     * ogg constructor - creates a new ogg object
     *
     * $file - the path to the ogg file. When in doubt use a full path.
     */
    function ogg($file) {

	$this->file = false; // ogg file name (you should never modify this)
	$this->_version = 0.10; // Version of the ogg class (float, not major/minor)
	$this->fields = array(); // comments fields, this is a two dimentional array.
	$this->_rawfields = array();  // The comments fields read and split but not orgainzed.
	$this->error = false; // Check here for an error message
	$this->debug = false; // print debugging info?
	$this->debugbeg = '
';
	$this->debugend = '
';

	if (defined('OGG_SHOW_DEBUG')) $this->debug = true;
	if ($this->debug) print($this->debugbeg . "ogg('$file')
\n");

	$this->file = $file;
	$this->_read();

	if ($this->debug) print($this->debugend);
    } // ogg($file)

    /*
     * _read() - finds the comment in a ogg stream. You should not call this.
     */
    function _read() {
	if ($this->debug) print($this->debugbeg . "_read()
\n");

	if (! ($f = fopen($this->file, 'rb')) ) {
	    $this->error = 'Unable to open ' . $file;
	    if ($this->debug) print("$this->error$this->debugend");
	    return false;
	}

	$this->_find_page($f);
	$this->_find_page($f);

	fseek($f, 26 - 4, SEEK_CUR);
	$segs = fread($f, 1);
	$segs = unpack('C1size', $segs);
	$segs = $segs['size'];
	if ($this->debug) print("segs: $segs
");
	fseek($f, $segs, SEEK_CUR);

	// Skip preable
	//$r = fread($f, 1);
	//print_r(unpack('H*raw', $r));
	fseek($f, 7, SEEK_CUR);

	// Skip Vendor
	$size = fread($f, 4);
	$size = unpack('V1size', $size);
	$size = $size['size'];
	if ($this->debug) print("vendor size: $size
");
	fseek($f, $size, SEEK_CUR);

	// Comments
	$comments = fread($f, 4);
	$comments = unpack('V1comments', $comments);
	$comments = $comments['comments'];
	if ($this->debug) print("Comments: $comments
");
	for ($i=0; $i < $comments; $i++) {
	    $size = fread($f, 4);
	    $size = unpack('V1size', $size);
	    $size = $size['size'];
	    if ($this->debug) print("comment size: $size
");

	    $comment = fread($f, $size);
	    if ($this->debug) print("comment: $comment
");
	    $comment = explode('=', $comment, 2);
	    $this->fields[strtoupper($comment[0])][] = $comment[1];
	    $this->_rawfields[] = $comment;
	}

	if ($this->debug) print($this->debugend);
    } // _read()

    /*
     * _find_page - seeks to the next ogg page start.
     */
    function _find_page(&$f) {
	if ($this->debug) print($this->debugbeg . "_find_page($f)
\n");

	$header = 'OggS'; // 0xf4 . 0x67 . 0x 67 . 0x53
	$bytes = fread($f, 4);

	while ($header != $bytes) {
	    //if ($this->debug) print('.');
	    $bytes = substr($bytes, 1);
	    $bytes .= fread($f, 1);
	}

	if ($this->debug) {
	    echo 'Page found at byte: ', ftell($f) - 4, '
';
	    print($this->debugend);
	}
    } // _find_page(&$file)

} // end of class ogg


$cssthemes[0] = '
body
{
	background-color: #FFFFFF;
	color: #000000;
	margin-top: 10px;
	margin-left: 10px;
	margin-right: 5px;
	margin-bottom: 5px;
	padding-top: 0px;
	padding-right: 0px;
	padding-bottom: 0px;
	padding-left: 0px
}
.smalltext
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small; background-color: #FFFFFF;
	color: #003333
}
.tblbulletin
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	background-color: #FFFFFF;
	color: #000000;
	border: 1px #000000;
	border-style: solid
}
.row2nd
{
	background-color : #dcdef4
}
.tdlogin
{
	background-color : #000000
}
.logintext
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	color: #FFFFFF;
	background-color: #000000
}
.loginkplaylist
{
	color: #BBBBBB;
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 10px
}
.statistics
{
	color: #000000;
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 8px
}
a:hover.hot
{
	color: #EF610C;
	text-decoration: underline;
	font-style: normal
}
.warning
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal
}
.notice
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #000000
}
.fatbuttom
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	background-color: #FFFFFF;
	border: 1px #000000;
	border-style: solid
}
.fatfield
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	background-color: #dcdef4;
	border: 1px #000000;
	border-style: solid
}
.logonbuttom
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	background-color: #000000;
	border: 1px #CCCCCC solid;
	color: #FFFFFF
}
.wtext
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #000000
}
.text
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: x-small;
	font-style: normal;
	color: #FFFFFF
}
.dir
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: x-small;
	font-style: normal;
	color: #030670
}
.finfo
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #333333
}
a
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #000000;
	text-decoration: none
}
.file
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #000066
}
.filemarked
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small;
	font-style: normal;
	color: #EF6100
}
.curdir
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: x-small;
	color: #000000;
	text-decoration: none
}
.userfield
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: xx-small
}
.boxhotlist
{
	color: #BBBBBB;
	background-color: #EF6100;
	border-style: solid;
	border-top-width: 0px;
	border-right-width: 0px;
	border-bottom-width: 1px;
	border-left-width: 1px
}
.box
{
	color: #BBBBBB;
	background-color: #4F35B3;
	border-style: solid;
	border-top-width: 0px;
	border-right-width: 0px;
	border-bottom-width: 1px;
	border-left-width: 1px
}
.tdborder
{
	border-color: black black black #666666;
	border-style: solid;
	border-top-width: 0px;
	border-right-width: 0px;
	border-bottom-width: 1px;
	border-left-width: 0px
}
.importnant
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-style: normal;
	color: #000000
}
.importnantlink
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-style: normal;
	color: #0000FF
}
.header
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-style: normal;
	color: #000000
}
.headermarked
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: 10pt;
	font-style: normal;
	color: #EF6100
}
.bbox
{
	font-family: Verdana, Arial, Helvetica, sans-serif;
	font-size: x-small;
	font-style: normal;
	color: #FFFFFF
}
.bboxtable
{
	background-color: #FFFFFF
}';


function klogon($msg = '')
{
	kprintheader(get_lang(29), 1); 
	kprintlogin($msg);
	kprintend(); 
	die();
}

function errormessage($msg, $back = true)
{
	kprintheader(get_lang(56),0);
	if ($back) $code = '  '.get_lang(34).' '; else $code = '';
	blackbox(get_lang(56),'
'.$msg.'

'.$code.'

',0);
	kprintend();
	die();
}

class kpdesign
{
	function kpdesign()
	{
		$this->style = db_guinfo('theme');
		$this->addform = true;
	}

	function form()
	{
		global $PHP_SELF, $runinit;
		?>
		

		
		
		style)
		{
			case 0:
				?>
				

				

					

					addform) $this->form(); ?>
					';	
	
	$text = $crstr_dl = $crstr = '';

	if ($showalbum && $files > 0)
	{
		$crstr .= '  ';
		$crstr_dl = '  ';
	} 
	
	if ($files > 0) $crstr .= '';

	if ($dirs > 0 && $recursive) $crstr .= '  ';
	
	$crstr_dl .= '";

	$playlists = db_getplaylist($u_id);
	$ploutput = '';
	if (count($playlists)>0)
	{
		if ($files > 0) $ploutput .= ' ';
		$ploutput .= '';
		
		$playid = db_guinfo("defplaylist");
		for ($c=0,$cnt=count($playlists);$c<$cnt;$c++) 
		{		
			if ($playlists[$c][1] == $playid) $sel=' selected="selected" '; else $sel='';
			$ploutput .= ''.$playlists[$c][0].'';
		}
		$ploutput .= ' ';
	}
	$ploutput .= '';
	if (count($playlists)>0)
	{
		$ploutput .= ' ';
		$ploutput .= ' ';
	}
	
	$upload = '';

	$ploutput .= "';
	$selectallcode='    ';
	
	?>	
	
					
					

					

				
				

				

					

					
					

						addform) $this->form(); ?>
						

						

						

						
						
				style)
		{
			case 0:
				echo '
';
				infobox();
				echo '
';
				break;
		
			case 1:
				echo '
';
				break;
		}
	}
}

function compute_statistics()
{
	$row = mysql_fetch_array(db_execquery('SELECT SUM(lengths) AS ls, COUNT(*) AS nr, SUM(fsize) AS fs FROM '.TBL_SEARCH), true);
	if ($row)
	{
		$secs = (int)$row['ls'];
		$days = floor($secs/86400);
		$secs = $secs % 86400;
		$hours = floor($secs/3600);
		$secs = $secs % 3600;
		$min = floor($secs/60);
		$mb = floor($row['fs'] / 1048576);
		return get_lang(155,$days, $hours, $min, $row['nr'],$mb);
	}
}

function endmp3table($showalbum=1, $dirs=0, $files=0, $recursive = true) 
{
	global $u_id, $PHP_SELF, $runinit, $cfg;
	echo '

	

	 0) echo '';
		if (!empty($crstr)) echo '';
		if (ALLOWDOWNLOAD && db_guinfo('u_allowdownload') && $cfg['archivemode'] && $files > 0) echo '';

		echo '';
		if (ENABLEUPLOAD) echo '';
		?>
		
	
		

		
'.blackbox(get_lang(73), $selectallcode).'
 '.blackbox(get_lang(74), $crstr).'
 '.blackbox(get_lang(117), $crstr_dl).'
'.blackbox(get_lang(75), $ploutput).'
'.blackbox(get_lang(234), $upload).'
	
	
	
	
	 0)
	{
		$out .= '';
		$out .= '';
		$options = array();
		while ($row = mysql_fetch_assoc($res)) $options[] = array($row['listid'], $row['name']);
		$out .= genselect('sel_shplaylist', $options, db_guinfo('defshplaylist'), 'file');		
		$out .= '  ';
		$out .= '';
	}
	return $out;
}

function infobox()
{
 	global $PHP_SELF, $u_cookieid, $u_id, $app_ver, $setctl, $u_id, $app_build, $homepage;
	$homepage = str_replace('KBUILD', $app_build, str_replace('KVER', $app_ver, $setctl->get('homepage')));
	?>	
	

	

		
		
		get('showkeyteq')) 
		{
			?>'.substr(get_lang(77),0,3).''.substr(get_lang(77),3); ?>get('showupgrade')) 
		{
			?>
			
get('showkeyteq')) echo '
'; ?>
		v
		
	
	

		

	
	

		

		

		

			

			

			

				

					

						

						
						get('showstatistics'))
						{
							?>
							updatelist();

						?>
						

						
 
									
						

							
' maxlength="150" size="46" class="fatbuttom"/>
	
						
						

							

						
						

							

								/> 
								/> 
								/> 
								/>
							
		
						
						

							

						
						

							

								/>
											
								 
								
								>
								>
								
								
							
		
						
						

							

						
						

							

						
		
						

							

						
						

							

							
							
							
						
						
						

							

						
						

							
getlatest(), 0, false, 'box', 'left', '240'); ?>
								
						
						

							

						
						

							
show(), 0, false, 'box', 'left', '240'); ?>
								
						
		
						
						
					
				
				
					

					

					

					
					
					
					
					

				

				

				

				
				';
					
					$othercode = '  ';

					$othercode .= ' ';


					$usermisc = '  '.
								' ';
					$usermisc .=  ' ';

					?>
					

				
						

							

						
						 '.
						' ';
						
						echo blackbox(get_lang(88),$admincode, 0, false, 'box', 'left', '240'); ?>
						
						

					


					

					
					
						

						
					

					

				
				
				
				
			
		
	
	
	
	
	
get('includeheaders', 1, 1)) 
	{
	?>
		
		
		
		
		
		
		get('externaljavascript');
	if (empty($extjs)) outjavascripts($js_out); else echo '';

	if ($setctl->get('includeheaders', 1, 1))
	{
		?>
		
		
		get('includeheaders', 1, 1))
	{
		$css = $setctl->get('externalcss', '', 0); 
		if (!empty($css))
		{
			?>
			
			
				
				get('includeheaders', 1, 1)) echo '';
}

function blackbox($title,$code,$returncode=1,$nowrap=true,$class='box',$textalign='left',$width=0)
{
	$mix = '
'.
	'';
	$mix .= ''.
	''.
	'
';
	if (!$returncode) echo $mix; else return($mix);
}

function blackboxpart($title, $pos)
{
	$data = blackbox($title, '%code');
	$p = strpos($data, '%code');
	if ($p !== false)
	{
		if ($pos == 1) return substr($data, 0, $p);
			else return substr($data, $p+5);
	}
}

function outjavascripts()
{
	?>
	
	 $db['user'], 'host' => $db['host'], 'name' => $db['name'], 'pass' => $db['pass']);

$mysqlserverv = '';

function check_all_tables(&$dbcount)
{
	global $dbtables, $dbtable, $dbalter, $installdb;
	$ignore = array();
	if (db_gconnect())
	{
		$sql = array();

		foreach ($dbtable AS $name => $val)  
		if (db_execquery('DESC '.$name) == false) 
		{
			$sql[] = $installdb[$val];
			if ($val == 5) $sql[] = $installdb[9];
			$ignore[$name] = true;
		} else $dbcount++;
		
		foreach ($dbtables AS $name => $val) 
		{
			if (!isset($ignore[$name]))
			{
				for ($i=0,$c=count($dbtables[$name]);$i<$c;$i++)
					if (db_execquery('SELECT '.$dbtables[$name][$i].' FROM '.$name.' LIMIT 1') == false) $sql[] = $dbalter[$name][$dbtables[$name][$i]];
			}
		}
		return $sql;
	}
}

function check_version()
{
	global $enable_tablecheck, $app_build, $oldbuild;
	$result = db_execcheck('SELECT * from '.TBL_KPLAYVERSION);
	if ($result)
	{
		$data = mysql_fetch_array($result);
		if (isset($data['app_build']))
		{
			$oldbuild = (int)$data['app_build'];
			if ($oldbuild != $app_build) $enable_tablecheck = true;
		}
	} else $enable_tablecheck = true;
}

function kinstall_logo($height='64', $width='208')
{
	return '';
}

function kcheckaccess($user, $pass, &$errmsg, &$errno)
{
	global $db;
	$status = 0;
	$link = @mysql_connect($db['host'], $user, $pass, true);
	if ($link)
	{
		if (@mysql_select_db($db['name'], $link)) $status = 1;
		else
		{
			$errmsg = mysql_error($link);
			$errno = mysql_errno($link);
			switch ($errno)
			{
				case 1049: $status = 1; break; // database not exist. OK.
				default: $status = 0; break;
			}
		}
		@mysql_close($link);
	} else 
	{
		$errno = mysql_errno();
		$errmsg = mysql_error();
	}
	return $status;
}

function showsql()
{
	global $installdb, $installdbuser;
	echo '';
	echo '';

	if (isset($_GET['dbi'])) $dbi = $_GET['dbi']; else $dbi = 1;

	if ($dbi) $start = 1; else $start = 2;

	for ($i=$start;$i';

	if ($dbi)
	{
		echo '';
		echo '';	
	}
	echo '
'."\n";
	echo 'The installers SQL code:';
	echo "\n".'
'.str_replace("\n", '
', $installdb[$i]).';
'.$installdbuser[0].';
'.$installdbuser[2].';
';
}

function show_feedback($upgrade = false)
{
	global $app_ver, $app_build, $oldbuild, $mysqlserverv;
	?>
	
	
	

	'; 
		echo ''; 
	}
	?>
	

		

			
Software
			

		
		

			
MySQL
			

		
		

			
Version
			

		
		

			
Build
			

		
		

			
Have a comment?
			

		
		
		

			

			

		
	
	
	
		
		

			

			

				
An error occured during install!
			
			

			
 
				

			
			

			
			
			
			

			

				
You can restart the installation process by opening up a new window and enter the same URL.
			
			
			

			

				

					Click here for opening the INSTALL reference.
				
			
			

		
	', $installdb[$i]).'
';
				$errors .= mysql_error($link).'
';
				$error = $i;
			}
		}
	} else insterror('Could not use the database ('.$db['name'].')');

	if (!$error) 
	{
		kprintheader('Installing MySQL database', 1);
		?>
		

		
 
		

		
		

			

			

			
Installation is now completed.
				

					
To log in to kPlaylist, reload this page (firm reload) and you should be able to log in.
					
All settings and configuration is available via WEB, click the 'Settings' button to the right.
					
The default kPlaylist login is admin with admin as the password.
				
				
				


				Would you like to send the following information about this successful installation? This would
				give the kPlaylist site valuable information about supported systems, but also to increase the motivation knowing
				that this script actually is used. Thank you!
				



 				
				
				Remember to visit http://www.kplaylist.net for updates and help.
			
			
			
			
'.$errors);
}

function kinstall_selectmethod()
{
	global $PHP_SELF;
	kprintheader('Install', 1);
	?>
	

	

		

			

		
		

		

		

		
		
		

			
Welcome to the kPlaylist installer!
		
	
		

		

			

			To install kPlaylist, you'll need a working and running copy of MySQL. This is a GPL product, 
			please read the disclaimer of liability
			before you continue. If you do not agree with the disclaimer you must abort the installation and use of this product.
			
		
		
		
		

			
Click on one of the following installation methods to continue:
		
		

		

			
      
				
			
		
		

		

			
PS! If you are running kPlaylist on your own machine, the suggested method is to create a new database.
		
		
		
		
	
	
	
	

	

	

		

		

		
	
		
Manual upgrade necessary
		

		

		
		
	
	
	
	

	 
	
	

	
		
		

	
	

	

	
		Please enter a user and a password who has access to create a new database and a user for kPlaylist. In
		most cases, the root user of MySQL should be used.
	
		Please open the kPlaylist file in a text editor and modify the section called $db to suit
		your database settings. Click 'Reload' when you are done.
		
	 

Click here to view what the installer is going to do. 

Click 'Continue' when ready to install ! 

	  
Note! The root password will only be used to create
		the tables, a new user called  with password  will be created for the operation of kPlaylist. If you like to change the name and password for this user, please edit the script, and click Reload.
 
		'.$text.'
'; ?>
		

		
    
	

	
	

		

		

		

		

	
	


	
 
		
MySQL user:
		

		value="" class="fatbuttom"/>
		
default: 
	
	
	
	
 
		
MySQL password:
		
value="" class="fatbuttom"/>
		
default: 
	
	
	
	

	

		
If you need to change the settings below, please edit them in the script and click Reload.
	
	
	
	
	
 
		
MySQL host:
		

	
	
	
	
 
		
MySQL database:
		

	
	
	
	
 
		
Table prepend
		

	
	

		

	
	

      

		 
		 
		
		
	
	
 
		
You'll find documentation here: kPlaylist Homepage
	
  
	
	
	Could not login with the supplied user name and password! MySQL said: '.$err.''; 
			if ($errno == 1251) $msg .= '

Seems like you are running MySQL 4.1. Please go to the following location to read the solution: http://www.kplaylist.net/forum/viewtopic.php?p=2231'; 
			kinstall_show_form($msg, $dbmethod);
		}
	} else
	if (isset($_POST['usedatabase']) || isset($_POST['newdatabase']) || isset($_POST['instmethod']))
	{		
		kinstall_show_form('', $dbmethod);
	} else
	if (isset($_GET['showgpl']))
	{
		kprintheader();
		echo 'The GPL license is available here: http://www.kplaylist.net/COPYING';
		kprintend();
	} else
	if (isset($_GET['showsql']))
	{
		kprintheader();
		showsql();
		kprintend();
	} else kinstall_selectmethod();
	die();
}

if ($enable_install) kinstall_handler();

function show_upgrade($sql, $error="")
{
	global $db, $dbi, $PHP_SELF;
	kprintheader();
	?>
	

	

	
 
		
kPlaylist database upgrader.
	
	

		


		We are sorry for the inconvience, but there are some changes in the database in this new version of kPlaylist and we have to perform a simple upgrade.

 Please supply a user who has access to alter the MySQL database (usually the root user of MySQL.). You can also run the SQL calls listed below manually and reload this page.
	
	
		

		
Errors during upgrade, please check the errors below and try again.
		

		

		

		
	

	

	
SQL call(s) we will be executing:
	

	
', $sql[$i]).';

';
	}
	?>
	
	

	

	

	
 
		
MySQL database:
		

		
		
	
	
 
		
MySQL host:
		
 
		
		
	
	
If either the database name or the host is wrong, please edit the script and reload this page.
	
	
	
 
		
MySQL user:
		
 
		
		
	
	
 
		
MySQL password:
		
 
		
		
	
	

	

		

	
	
	
	load();
	kprintheader();
	?>
	

	

	
 
		
kPlaylist database upgrader.
	
	

		


		Upgrading performed successfully. Enjoy your new version of kPlaylist.

 
		Reload this page to get started.


		
		Would you like to send the following information about this successful upgrade? This would
		give the kPlaylist site valuable information about supported systems, but also to increase the motivation knowing
		that this script actually is used. Thank you!
		



		
		
		
	
	
	get('lamecmd');
		if (!empty($lc))
		{
			if (crc32($lc) != 237452143 && $lc != $cfg['lamecmd'])
			{
				$stxt = 'Due to security reasons, the lame command is no longer available in the settings, and you have to edit the kPlaylist file manually to suit your existing setup. 
				Please change the $cfg[\'lamecmd\'] in the kPlaylist file or create a kpconfig file (look here) and change it to this: 

';
				$stxt .= '$cfg[\'lamecmd\'] = \''.str_replace("'", "\'", $lc).'\';

';				
				$stxt .= 'When you are finished, press F5.';
				manual_upgrade($stxt);
				die();
			} else $setctl->set('lamecmd', '');
		}
	}

	$cnt = 0;
	$update_sql = check_all_tables($cnt);

	if ($cnt == 0) kinstall_handler();

	if (count($update_sql) > 0) 
	{
		$error = "";
		if (isset($_POST['executeupgrade']))
		{
			$dbi['user'] = $_POST['mysqluser'];
			$dbi['pass'] = $_POST['mysqlpass'];
			$link = mysql_connect($db['host'], $dbi['user'], $dbi['pass'], true);
			if ($link)
			{
				$mysqlserverv = mysql_get_server_info($link);
	
				$sqls = check_all_tables($cnt);
				if (mysql_select_db($db['name'],$link))
				{
					for ($i=0,$c=count($sqls);$i<$c;$i++)
					{
						if (!empty($sqls[$i]))
						{
							if (!mysql_query($sqls[$i], $link))
							{
								$error = "Could not execute: ".$sqls[$i]."
MySQL said: ".mysql_error($link)."
";
								break;
							}
						}
					}
				} else $error = "Could not select the database name";
			} else $error = "Could not connect. Please check that the username or password is correct.";
			if (empty($error)) upgrade_ok();
		}
		show_upgrade(check_all_tables($cnt),$error);
	} else
	{
		$sql = 'update '.TBL_KPLAYVERSION.' set app_build = "'.$app_build.'", app_ver = "'.$app_ver.'"';
		db_execcheck($sql);
	}
}


function kprintlogin($msg = '')
{
 	global $app_ver, $app_build, $PHP_SELF, $phpenv;
?>


 

	

		

	
	

		

	
	

		

			

				

					

				
				

					

					

					

					

				
				

					

				
				

					

					

					

						
					
				
				

					

				
				

					

					

					

				
				

					

				
				

					
					
					

					

					

						

						
							'.get_lang(41).''; 
						?>
						
						
  
					
					
					
				
				
					

						

					
					

						

					
					
				

					

				
			
		
	





	

		
		
	


	
www.kplaylist.net 


listid = -1;
		$this->name = '';
		$this->status = false;
		$res = db_execquery('SELECT * FROM '.TBL_PLAYLIST.' WHERE listid = '.$listid);
		if ($res && mysql_num_rows($res) > 0)
		{
			$row = mysql_fetch_assoc($res);
			$this->status = $row['status'];
			$this->name = $row['name'];
			$this->listid = $listid;
		}
	}

	function getres()
	{
		return db_execquery('SELECT sid FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$this->listid.' ORDER BY seq ASC');
	}

	function play()
	{
		if ($this->listid >= 0)
		{
			$result = $this->getres();
			if ($result && mysql_num_rows($result) > 0)
			{
				$tunes = array();
				$i=0;
				while ($row = mysql_fetch_row($result)) $tunes[$i++] = $row[0];
				$cnt = $i;
				if ($this->status)
				{
					srand ((double)microtime()*1000000);
					for ($j=count($tunes)-1; $j>0; $j--) 
					{
						if (($i = rand(0,$j))<$j) 
						{
							$swp=$tunes[$i]; 
							$tunes[$i]=$tunes[$j]; 
							$tunes[$j]=$swp;
						}
					}
				}
				$m3ug = new m3ugenerator();
				for ($i=0;$i<$cnt;$i++) $m3ug->sendlink2($tunes[$i]);
				$m3ug->start();
				return true;
			}
		}
		return false;
	}
}

function playlist_createnew($name,$shared=0)
{
	global $u_id;
	if (db_execquery('INSERT INTO '.TBL_PLAYLIST.' SET name = "'.$name.'", u_id = '.$u_id.', public = '.$shared)) return 1;
	return 0;
}

function playlist_delete($nr)
{
	db_execquery('DELETE FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$nr);
	db_execquery('DELETE FROM '.TBL_PLAYLIST.' WHERE listid = '.$nr);
}

function pl_sortoriginal($id)
{
	$result = db_execquery('SELECT id from '.TBL_PLAYLIST_LIST.' WHERE listid = '.$id.' ORDER BY ID ASC');	
	$seq = 1;
	while ($row = mysql_fetch_row($result))
	{
		$id = $row[0];
		db_execquery('UPDATE '.TBL_PLAYLIST_LIST.' SET seq = '.$seq.' WHERE id = '.$id, true);
		$seq++;
	}
}

function pl_removeduplicates($playlist_id)
{
	$result = db_execquery('SELECT sid,id from '.TBL_PLAYLIST_LIST.' WHERE listid = '.$playlist_id.' ORDER BY ID ASC');	
	$sids = array();
	while ($row = mysql_fetch_row($result))
	{
		$sid = $row[0];
		$id = $row[1];
		if (isset($sids[$sid])) db_execquery('DELETE FROM '.TBL_PLAYLIST_LIST.' WHERE id = '.$id, true);
		$sids[$sid] = true;
	}
	playlist_rewriteseq($playlist_id);
}

function pl_sortrandom($id)
{
	$result = db_execquery('SELECT id from '.TBL_PLAYLIST_LIST.' WHERE listid = '.$id.' ORDER BY ID ASC');		
	srand(make_seed());
	while ($row = mysql_fetch_row($result))
		db_execquery('UPDATE '.TBL_PLAYLIST_LIST.' SET seq = '.getrand().' WHERE id = '.$row[0], true);	
	playlist_rewriteseq($id);
}

function pl_sortalphabetic($id)
{
	$result = db_execquery('SELECT pl.id as id FROM '.TBL_PLAYLIST_LIST.' pl, '.TBL_SEARCH.' s WHERE pl.listid = '.$id.' and pl.sid = s.id order by s.free asc');		
	$seq = 1;
	while ($row = mysql_fetch_row($result))
	{
		db_execquery('UPDATE '.TBL_PLAYLIST_LIST.' SET seq = '.$seq.' WHERE id = '.$row[0], true);
		$seq++;
	}
}

function db_addtoplaylist($playlistnr, $tunes)
{
	global $u_id, $base_dir;
	$result = db_execquery('SELECT * FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$playlistnr);	
	$row = mysql_num_rows($result);
	$cntr=$row;
	$cntr++;

	if (count($tunes) > 0)
	{
		for ($i=0,$c=count($tunes);$i<$c;$i++)
		{			
			$f2 = new file2($tunes[$i]);
			if ($f2->ifexists())
			{
				db_execquery('INSERT INTO '.TBL_PLAYLIST_LIST.' (listid, sid, seq) VALUES ('.$playlistnr.', '.$f2->sid.', '. $cntr.')');
				$cntr++;
			} 			
		}		
	}
}

function db_readplaylist($playlistnr)
{
	global $u_id;
	$result = db_execquery('SELECT list FROM '.TBL_PLAYLIST.' WHERE u_id = '.$u_id.' AND listid = '.$playlistnr);
	$row = mysql_fetch_array($result);
	return $row['list'];
}

function playlist_rewriteseq($plid)
{
	if (is_numeric($plid))
	{
		$result = db_execquery('SELECT * FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$plid.' ORDER BY seq ASC');
		if (mysql_num_rows($result) > 0)
		{
			$cntr=1;
			while ($row = mysql_fetch_array($result))
			{
				db_execquery('UPDATE '.TBL_PLAYLIST_LIST.' SET seq = '.$cntr.' WHERE id = '.$row['id'], true);
				$cntr++;
			}
		}
	}
}

function playlist_savesequence($seqlist, $id)
{
	global $u_id;
	$result = db_execquery('SELECT id FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$id.' ORDER BY seq ASC');
	$data = array();
	$cnt=0;
	while ($row = mysql_fetch_array($result))
	{
		$data['id'][$cnt] = $row['id'];
		$data['seq'][$cnt] = (int)$seqlist[$cnt];
		$cnt++;
	}
	if ($cnt > 0)
	{
		for ($i=0;$i<$cnt;$i++) db_execquery('UPDATE '.TBL_PLAYLIST_LIST.' SET seq = '.$data['seq'][$i].' WHERE id = '.$data['id'][$i]);
		playlist_rewriteseq($id);
	}
}

function playlist_editor($plid, $prev, $sort = 0)
{
	global $PHP_SELF,$u_cookieid, $base_dir, $u_id, $runinit,$phpenv, $cfg;
	kprintheader(get_lang(59), 1);

	$result = db_execquery('SELECT * FROM '.TBL_PLAYLIST.' WHERE listid = '.$plid);	
		
	if ($result)
	{
		$row = mysql_fetch_array($result);
		$name = $row['name'];
		$public = $row['public'];
		if ($row['u_id'] == $u_id || db_guinfo('u_access') == 0) $myown = 1; else $myown = 0;
		$shuffle = $row['status'];
	}
	
	$result = db_execquery('SELECT * FROM '.TBL_PLAYLIST_LIST.' WHERE listid = '.$plid.' ORDER BY seq ASC');

	if ($result) $many = mysql_num_rows($result); else $many = 0;
	$playlistlink = ''.
					''.
					''.
					'';
	
	$code = '
';
	$code .= '    ".
	$playlistlink.
	'  ';

	if ($myown) $code .=
	"  ";
	if (ALLOWDOWNLOAD && db_guinfo('u_allowdownload') && $cfg['archivemode']) $code .= '  ';
	if ($myown) $code .= '  ';

	if ($myown)
	{			
		$code .= ''.get_lang(44).'  '.
		get_lang(125).'    '.
		'';
	
		$e = array(0 => '', 1 => '', 2 => '', 3 => '');
		$e[$sort] = ' selected="selected"';
		$code .= '   '.
				''.get_lang(170).''.
				''.get_lang(171).''.
				''.get_lang(173).''.
				''.get_lang(180).''.
				'';
		$code .= '  ';
	}
	
	$code .= '  ';
	if (UNAUTHORIZEDSTREAMS) $code .= 'i';
	$code .= '
';

	echo '
';	
	blackbox(get_lang(46, $name, $many),$code,0);
	echo '
';
	
	echo '
';	
	echo '';
	if ($myown) echo blackboxpart(get_lang(47),1); else echo blackboxpart(get_lang(48),1);

	$out = '';
	if ($many > 0)
	{
		echo '';
		echo	'';
		echo	'';

		echo '';
		
		echo '
		';
		echo '';		
		echo '';	
		echo '';			
		$totplaytime = $count = $countfails = 0;
		
		while ($row = mysql_fetch_array($result))
		{
			$count++;			
			$id = $row['id'];

			$f2 = new file2($row['sid'], true);
			if (!$f2) continue;
			$fexists = $f2->ifexists();
			$id3 = $f2->getid3();

			if (($count % 2) == 0) echo ''; else echo '';
			
			echo '';
			echo '';
		} 

		?>
		';

		$secs = $totplaytime;
		$days = floor($secs/86400);
		$secs = $secs % 86400;
		$hours = floor($secs/3600);
		$secs = $secs % 3600;
		$min = floor($secs/60);
		$secs = $secs % 60;

		$totshow = get_lang(187, $days, $hours, $min, $secs);
		
		echo '';
		echo '';
		echo '';
		echo '
 
		    
'.get_lang(49).'
		    
'.get_lang(50).'
			
'.get_lang(51).'
		    
'.get_lang(52).'
		    
';		
			if ($myown) echo get_lang(53);
			echo '
			

			
'.get_lang(54).'
		

			
			
';

			if ($myown) echo ''; 
				else
			echo lzero($row['seq']);
			echo '
';
			$idv3info  = '';

			if (!$fexists)
			{ 
				echo ''.get_lang(182).''; 
				$countfails++; 
			} else
			{
				if (!empty($id3['bitrate']) && !empty($id3['length'])) $idv3info = $id3['bitrate'].'kb - '.$id3['length']; 
				if (is_numeric($id3['lengths'])) $totplaytime += $id3['lengths'];
				echo get_lang(181);
			}
			echo '
'.$idv3info.'
';
			if ($myown) echo ' '.get_lang(43).' ';
			echo '
';

			if ($fexists) echo ''.$f2->gentitle(array('title', 'artist'), 70).''; 
				else echo ' ';

			
			echo '

			

		
		

			

		
		

			

		
		

			

			


		'.get_lang(56).'';
		echo '
'.$totshow.'
 
';

		echo	''.
				'  '.get_lang(73).'    '.
				'  '.
		get_lang(57).'    ';

		if ($myown) echo '  '.get_lang(58).'  ';

		echo '  
 
';
	}
	if ($myown) echo blackboxpart(get_lang(47),2); else echo blackboxpart(get_lang(48),2);
	echo '
'; 
}

function playlist_new()
{
	global $PHP_SELF;
	kprintheader(get_lang(61), 1);
	?>
	

	
	
	
	set('report_attempts', 0);
				$setctl->set('windows', 0);
				$setctl->set('require_https', 0);
				$setctl->set('usersignup', 0);
				$setctl->set('mailmp3', 0);
				$setctl->set('bulletin', 0);
				$setctl->set('approvesignup', 0);
				$setctl->set('urlsecurity', 0);
				break;

			case 1:
				$setctl->set('includeheaders', 0);
				$setctl->set('showkeyteq', 0);
				$setctl->set('showupgrade', 0);
				$setctl->set('showstatistics', 0);
				$setctl->set('albumcover', 0);
				$setctl->set('albumresize', 0);
				$setctl->set('fetchalbum', 0);				
				break;

			case 2:
				$setctl->set('streamingengine', 0);
				$setctl->set('allowdownload', 0);
				$setctl->set('allowseek', 0);
				$setctl->set('disksync', 0);
				$setctl->set('sendfileextension', 0);
				$setctl->set('unauthorizedstreams', 0);				
				$setctl->set('writeid3v2', 0);
				$setctl->set('optimisticfile', 0);
				$setctl->set('lamesupport', 0);
				$setctl->set('enableupload', 0);
				break;
		}
				
		foreach ($data as $key => $value)
		{			
			switch ($key)
			{
				case 'base_dir':
					$value = basedir_rewrite($value);
					if ($value != $setctl->get('base_dir')) $setctl->set('basedir_changed', 1);
					break;

				case 'timeout':
						if ($value < 600 && $value != 0) $value = $setctl->get('timeout');
						break;

				case 'uploadpath':
					if (!empty($value))
					{
						$value = slashtranslate($value);
						if (strlen($value) > 0) if ($value[strlen($value)-1] != '/') $value .= '/';	
					}
					break;

				case 'filetemplate':
					$value = stripcslashes($value);
					break;

				case 'homepage':
					$value = htmlentities($value);
					break;	
				
				case 'albumfiles': $value = stripcslashes($value); break;

				case 'uploadflist': $value = stripcslashes($value); break;
				
				case 'externimagespath':						
					if (!empty($value)) if ($value[strlen($value)-1] != '/') $value .= '/';	
					break;				
			}
			$setctl->set($key, $value);			
		}				
	}
}

function helplink($section, $name='?')
{
	global $deflanguage, $app_build;
	return ''.$name.'';
}

function store_filetype($id, $m3u, $search, $logaccess, $mime, $extension='')
{
	if ($id != 0)
	{	
		db_execquery('UPDATE '.TBL_FILETYPES.' SET m3u = '.$m3u.', search = '.$search.', logaccess = '.$logaccess.', mime = "'.$mime.'", extension = "'.$extension.'" WHERE id = '.$id);
		return $id;
	} else 
	{
		db_execquery('INSERT INTO '.TBL_FILETYPES.' SET m3u = '.$m3u.', search = '.$search.', logaccess = '.$logaccess.', mime = "'.$mime.'", enabled = 1, getid = 0, extension = "'.$extension.'"');
		return mysql_insert_id();
	}	
}

function edit_filetype($id, $reload = false)
{
	global $PHP_SELF;

	if ($id != 0)
	{
		$res = db_execquery('SELECT * FROM '.TBL_FILETYPES.' WHERE id = '.$id);
		$row = mysql_fetch_assoc($res);		
	} else 
	{
		$row['extension'] = '';
		$row['mime'] = '';
		$row['m3u'] = 1;
		$row['search'] = 1;		
		$row['logaccess'] = 1;
	}
	kprintheader(get_lang(209), 1);
	?>
	

	
	

	

	

		

		

		

	
	

		

		

		

	
	

		

		
>
		

	
	

		

		
>
		

	
	

		

		
>
		

	
	

		

	
	

		

			 
			
		
	
	
	
	
			

			

			
get('default_language'),'default_language'); ?>
			

			
			
			

			

			
getchecked('windows'); ?>/>
			

			

			

			

			
 value="1" name="require_https" getchecked('require_https'); ?>/>
			

			

			

			

			

			

			

			

			

			
getchecked('report_attempts'); ?>/>
			

			
			

			

			
getchecked('usersignup'); ?>/>
			

			
			

			

			
getchecked('approvesignup'); ?>/>
			

			
			

			

			

			

			
			

			

			

			

			
			

			

			
getchecked('mailmp3'); ?>/>
			

			
			
				
				

				

					get('mailmethod'); ?>
					
					>
					>
					
				
				

			
			
			

				

				
getchecked('bulletin'); ?>/>
				

			
			
			

			

			
getchecked('urlsecurity'); ?>/>
			

			
			
			

				

				

				

			
			

				

				
getchecked('includeheaders'); ?>/>
				

			
			

				

				

				

			
			

				

				

				

			
			

				

				

				

			
			

				

				
getchecked('showkeyteq'); ?>/>
				

			
			

				

				
getchecked('showupgrade'); ?>/>
				

			
			

				

				
getchecked('showstatistics'); ?>/>
				

			
			

				

				
getchecked('albumcover'); ?>/>
				

			
			

				

				

				

			
			

				

				
getchecked('albumresize'); ?>/>
				

			
			

				

				

				

			
			

				

				

				

			
			

				

				
getchecked('fetchalbum'); ?>/>
				

			
			

				

				

				

			
			

				

				

				

			
			
			

				

				

					 
								
				
				

			
			

				

				
getchecked('disksync'); ?>/>
				

			
			

				

				
getchecked('optimisticfile'); ?>/>
				

			
			

				

				
 
				
 i
			
	
			

				

				
getchecked('allowseek'); ?>/>
				

			
			

				

				
getchecked('allowdownload'); ?>/>
				

			
	
			

				

				
 name="streamingengine" getchecked('streamingengine'); ?>/>
				

			
			

				

				

				

			
			

				

				
getchecked('sendfileextension'); ?>/>
				

			
			

				

				
getchecked('unauthorizedstreams'); ?>/>
				

			
			

				

				
 name="writeid3v2" getchecked('writeid3v2'); ?>/>
				

			
			

				

				
 name="lamesupport" getchecked('lamesupport'); ?>/>
				

			
			

				

				
'/>
				

			
			

				

				
getchecked('enableupload'); ?>/>
				

			
			

				

				

				

			
			

				

				

				

			
			
				

					

						'; else echo '';
								?>
									

							

								

								

								

								

								
								

									

								
							

									

									

									
'.get_lang(109).'  ';
										
										echo ''.get_lang(71).' ';
									}
								?>
								
								
								
								
							

								
'.get_lang(69).' ';?>
							
						
					
				
				
	

	
		
	


	

	
		

			
		
	
	
	get('timeout') > 0 && isset($_POST['rememberme'])) $expiration = time() + $setctl->get('timeout'); else $expiration = 0;
					setcookie($cfg['cookie'],'');
					setcookie($cfg['cookie'], $num, $expiration);
					return true;
				}
			}
		}
	} else return true;
}

function db_verify_stream($cookie = 0, $ip)
{
	global $u_id, $setctl, $cfg, $validated_user;	
	if ($cfg['disablelogin']) 
	{
		$u_id = $cfg['assumeuserid'];
		loadvalidated($u_id);
		if ($validated_user === false) 
		{
			echo $cfg['assumeuserid'].' has a ID to a user that does not exist. Please set it correctly in the script and reload this page.';
			die();
		}
		return 1;
	} else
	{
		$result = db_execquery('SELECT u_id, u_login, u_pass, u_time FROM '.TBL_USERS.' WHERE u_sessionkey = '.$cookie);
		if ($result)
		{
			$row = mysql_fetch_array($result);
			$u_id = $row['u_id'];
			loadvalidated($u_id);
			$time = $row['u_time'];
			if ($cfg['demomode'] == 1) return 1;
			if ($setctl->get('timeout') != 0) if (($time + $setctl->get('timeout')) < time()) return 0;
			return mysql_num_rows ($result);
		}
		return 0;		
	}
}

function loadvalidated($uid)
{
	global $validated_user;
	if ($uid) $validated_user = mysql_fetch_array(db_execquery('SELECT * FROM '.TBL_USERS.' WHERE u_id = '.$uid));	
}

function db_verify_user($user, $pass)
{
	global $u_id;
	$result = db_execquery('SELECT u_id FROM '.TBL_USERS.' WHERE u_login = "'.$user.'" AND u_pass = "'.md5($pass).'" and u_booted = 0 and u_status != 2');
	$row = mysql_fetch_array($result);
	$u_id = $row['u_id'];
	return mysql_num_rows ($result);
}

function db_guinfo($field)
{
	global $validated_user;
	return $validated_user[$field];
}

function addhistory($u_id, $sid, $tid = 0)
{
	global $runinit;
	$active = 1;
	if ($runinit['astream']) $mid = mysql_thread_id(); 
	else
	{
		$mid = 0;
		$active = 0;
	}
	if (db_execquery('INSERT INTO '.TBL_MHISTORY.' SET active = '.$active.', mid = '.$mid.', u_id = '.$u_id.', s_id = '.$sid.', utime = '.time().', tid = '.$tid)) return mysql_insert_id();
}

function updateactive($id)
{	
	global $runinit;
	if ($runinit['astream']) db_execquery('UPDATE '.TBL_MHISTORY.' SET active = 1, mid = '.mysql_thread_id().' WHERE h_id = '.$id);
}	

function updatehistory($id, $pos)
{
	$res = db_execquery('SELECT s_id, dwritten FROM '.TBL_MHISTORY.' WHERE h_id = '.$id);
	if ($res && mysql_num_rows($res) == 1)
	{
		$row = mysql_fetch_row($res);
		$add = (int) $row[1];
		$add = $add + $pos;
		$res = db_execquery('SELECT fsize FROM '.TBL_SEARCH.' WHERE id = '.$row[0]);
		if ($res && mysql_num_rows($res) == 1)
		{
			$row = mysql_fetch_row($res);
			$size = $row[0];
			if ($add > $size) $add = $size;
			
			if ($size > 0 && $add > 0)
			{
				$dpercent = ($add / $size) * 100;
				db_execquery('UPDATE '.TBL_MHISTORY.' SET dwritten = '.$add.', dpercent = '.number_format($dpercent,0).' WHERE h_id = '.$id);
			}
		}
	}
}

function getlasthistory($sid, $uid, $rhid=false)
{
	$res = db_execquery('SELECT s_id, utime, h_id FROM '.TBL_MHISTORY.' WHERE s_id = '.$sid.' AND u_id = '.$uid.' ORDER BY h_id DESC LIMIT 1');	
	if ($res !== false && mysql_num_rows($res) > 0)
	{
		$row = mysql_fetch_assoc($res);
		if ($rhid) return $row['h_id']; 
			else return $row['utime'];
	} 
	return 0;
}

function gethistory($u_id, $rows = 0)
{
	$sql = 'SELECT h.tid, h.utime, s.free, h.dpercent, s.id, s.date,h.active FROM '.TBL_MHISTORY.' h, '.TBL_SEARCH.' s WHERE h.s_id = s.id and h.u_id = '.$u_id.' ORDER BY h.utime DESC';
	if ($rows != 0) $sql .= ' LIMIT '.$rows;
	return db_execquery($sql);
}

function get_archiver_combo($default)
{
	global $archivers;
	$out = '';
	for ($i=0,$c=count($archivers);$i<$c;$i++) 
	{
		if (is_array($archivers[$i]))
		{
			$out .= '';
		}
	}
	return $out;
}

function db_logout($cookie, $ip)
{
	global $cfg;
	if ($cfg['demomode'] != 1) db_execquery('UPDATE '.TBL_USERS.' SET u_status = 0, u_sessionkey = 0 WHERE u_sessionkey = '.$cookie.' and u_ip = "'.$ip.'"');
	setcookie($cfg['cookie'],'');
}

function show_userform($id = -1, $text = '', $name='', $pass='', $comment='', $login='', $access=1, $download=0, $udlrate=0, $allowemail = 0)
{
	global $PHP_SELF, $u_id;

	if ($id != -1)
	{
		$title = get_lang(95);
		$row = mysql_fetch_array(db_execquery('SELECT * FROM '.TBL_USERS.' where u_id = '.$id));
		$pass = "";
	}
	if ($id == -1) 
	{
		$title=get_lang(96); 
		$row['u_access'] = $access;
		$row['udlrate'] = 0;
		$row['u_allowdownload'] = $download;
		$row['u_name'] = $name;
		$row['u_login'] = $login;
		$row['u_comment'] = $comment;
		$row['udlrate'] = $udlrate;
		$row['allowemail'] = $allowemail;
		$row['u_booted'] = 0;
		$row['lameperm'] = 0;
		$row['email'] = '';
	} 
		
	kprintheader($title, 1);
	?>
	

	
	
	

	


	

		

	


	
 
      

		 
 />
		

	


	
 
		

		

		

	
	
 
		

		

		

	


		

		

		

		

		


		
 
		

		

		

		
    
		
 
			

			

			

		
		
 
			

			

			
			>
			>
			
			
			

		
		

			

			
 />
			

		
		
 
			

			

			

		
		
 
			

			
 />
			

		
		
 
			

			
 />
			

		
		
	
			

			

			

		

		

		
		
		
		
		 
		
		
		
  



get('approvesignup')) $ustatus = 2; else $ustatus = 1;
		
		if (isset($_POST['adduser']))
		{
			if (!empty($_POST['u_name']) && !empty($_POST['u_login']) && !empty($_POST['password']) && !empty($_POST['email'])) 
			{
				$result = db_execquery('INSERT INTO '.TBL_USERS.' SET u_name = "'.mysql_escape_string($_POST['u_name']).'", u_login = "'.mysql_escape_string($_POST['u_login']).'", u_pass = "'.
				md5(mysql_escape_string($_POST['password'])).'", u_comment = "'.mysql_escape_string($_POST['u_comment']).'", u_access = 1, u_allowdownload = 0, lang = '.$deflanguage.', email = "'.mysql_escape_string($_POST['email']).'", created = '.time().', u_status = '.$ustatus);
				if ($result) 
				{
					$text = get_lang(259);
					if ($setctl->get('approvesignup')) $text .= ' '.get_lang(285);
					signup_form($text, false);
				} else signup_form(get_lang(56));
			} else signup_form(get_lang(284));
		} else signup_form(); 
	}	
}

function signup_form($error='', $controls = true)
{
	global $PHP_SELF;
	kprintheader(get_lang(96),1);
	?>
	

	
	
	

	

		

	
	
 
		
* 
		

	
    
	
 
		
* 
		

	
	
 
		
* 
		

	
    
	
 
		

		

	
	
 
		
* 
		

	
	

		

		

			 
			
		
      
	
	
	
updatelist();

	$res = gethistory($id, $length);
	
	?>
	

	
	
	 get_lang(183), 1 => get_lang(117), 2 => get_lang(223), 3 => get_lang(267));	
		if ($res)
		{
			$cnt = 0;
			while ($row = mysql_fetch_assoc($res))
			{
				if ($row['active']) $class = 'filemarked'; else $class = 'wtext';
				if (($cnt % 2) == 0) echo ''; else echo '';
				?>
					

	

		

			  	
			 
			  
			
		
	
	

		

	
	
	

					
 80 ? substr($row['free'], 0, 80) : $row['free']; ?>
					

					

				
				
	

		

	
	
	
	
	';
	while ($row = mysql_fetch_array($result)) 
	{
		if (($pereach % 2) == 0) $out .= ''; else $out .= '';
		$pereach++;

		$ulogin = $row['u_login'];
		
		$uname = '';
		
		$out .= ''. $ulogin. "\n";
		$out .= ''. $uname. '';
		$out .= ' '.$row['u_ip']. '';

		if ($setctl->get('timeout') != 0 && $row['u_status'] == 1)  if (((int)$row['u_time'] + $setctl->get('timeout')) < time()) $row['u_status'] = 0;

		switch ($row['u_status'] )
		{
			case 0: $stout = get_lang(104); break;
			case 1: $stout = ''.get_lang(103).''; break;
			case 2: $stout = get_lang(282); break;
		}
		
		if ($row['u_booted'] == 1) $stout = get_lang(124); 

		$out .= ''. $stout. "\n";
		$out .= ''."\n";
		
		if ($u_id != $row['u_id']) $out .= ''.get_lang(109).'  ';
		
		if ($row['u_status'] == 2)
		{
			$out .= ''.get_lang(283).'';
		} else
		{
			$out .= ''.get_lang(177).'  ';
			if ($row['u_status'] == 1 && $u_id != $row['u_id']) $out .= ''.get_lang(110).'';
		}
		$out .= '';
	}

	$out .= "";
	$out .= "
". "\n";
	$out .= '';
	$out .= ''."\n";
	$out .= "\n";
	$out .= "
";
	$out .= '';
	$out .= ' ';
	$out .= ' ';
	$out .= '
';

    echo $out;
	kprintend();
	die();	
}

function user_saveoption($field, $value)
{
	global $u_id;
	db_execquery('UPDATE '.TBL_USERS.' SET '.$field.' = "'.mysql_escape_string($value).'" where u_id = '.$u_id);
	loadvalidated($u_id);
}

class kpuser
{
	function kpuser()
	{
		$this->allowed = false;
		$this->row = false;
		$this->numerics = array('hotrows', 'searchrows', 'u_language', 'archer', 'theme', 'lamerate', 'pltype');
		$this->id = -1;
	}

	function setallowed($allowed)
	{
		$this->allowed = $allowed;
	}

	function load($id)
	{
		if (is_numeric($id))
		{
			$res = db_execquery('SELECT * FROM '.TBL_USERS.' WHERE u_id = '.$id);
			if (mysql_num_rows($res) == 1) 
			{
				$this->row = mysql_fetch_assoc($res); 
				$this->id = $id;
				return true;
			}
		}
		return false;		
	}

	function arrsearch($needle, $array)
	{
		for ($i=0,$c=count($array);$i<$c;$i++) if ($needle == $array[$i]) return true; 
	}

	function validate($name, $value)
	{
		if (!$this->arrsearch($name, $this->allowed)) return false;

		if ($this->arrsearch($name, $this->numerics)) 
		{
			if (!is_numeric($value)) return false;
		}
		
		switch($name)
		{
			case 'hotrows':
			case 'searchrows':
					if ($value <= 0) return false;
		}
		
		if (isset($this->row[$name])) return true;
		return false;
	}

	function set($name, $value)
	{
		if ($this->validate($name, $value)) $this->row[$name] = $value;
	}

	function update()
	{
		$sql = 'UPDATE '.TBL_USERS.' SET ';
		$cnt = 0;
		$max = count($this->row);
		foreach($this->row as $name => $value)
		{
			$cnt++;
			if ($name == 'u_id') continue;
			$sql .= $name.' = "'.mysql_escape_string($value).'"';
			if ($cnt < $max) $sql .= ', ';
		}
		$sql .= ' WHERE u_id = '.$this->id;
		db_execquery($sql);
	}
}

function save_useroptions($_POST)
{
	global $u_id, $deflanguage;
	$state = 0;
	$kpu = new kpuser();
	$kpu->setallowed(array('extm3u', 'plinline', 'hotrows', 'searchrows', 'lang', 'archer', 'lamerate', 'theme', 'email', 'u_pass', 'pltype'));
	if ($kpu->load($u_id))
	{
		if (isset($_POST['changepass']) && isset($_POST['password']) && !empty($_POST['password']))
		{
			if (isset($_POST['curpassword']))
			{
				if (db_guinfo('u_pass') == md5($_POST['curpassword']))
				{
					$state = 2;
					$kpu->set('u_pass', md5($_POST['password']));
				} else $state = 3;
			}
		}
		$kpu->set('extm3u', 0);
		$kpu->set('plinline', 0);
		foreach($_POST as $name => $value) $kpu->set($name, $value);		
		$kpu->update();
	}
	loadvalidated($u_id);
	$deflanguage = db_guinfo('lang');
	return $state;	
}

function show_useroptions($msg='', $reload = false)
{
	global $PHP_SELF, $u_id, $klang, $deflanguage, $lamebitrates, $setctl, $themes;
	$result = db_execquery('SELECT * from '.TBL_USERS.' WHERE u_id = '.$u_id);
	if ($result) $row = mysql_fetch_array($result);
	if (!$row) die();
	if ($row['extm3u'] == 1) $ext3mu = 'checked="checked"'; else $ext3mu = '';
	if ($row['plinline'] == 1) $plinline = 'checked="checked"'; else $plinline = '';
		
	kprintheader(get_lang(123),1);
	?>
	

	
	get('lamesupport'))
	{
	?>	
	
	
	

	
		

		

	
	

		

		
/>
		

	
	
	
		

		
/>
		

	
	
	
		

		
 array(1, get_lang(294)), 1 => array(2, get_lang(295))), $row['pltype']); ?>
		

	
	

		

		

		

	
	

		

		

		

    
	
	

		

		

		

    
	
	

		

		

		

	
	
	
		

		

		

	
	
	
		

		

		

	
	
	
		

		

		

	
	

		

		

			 array(0, get_lang(221)));
			for ($i=1;$i
		
		

	
	
	

		

		

		
		
		

	
	
	
		

		

		

	
	

	

		

		 
				
		
		
 
	
	
	
	
	
	rows = 0;
		$this->query = '';
		$this->headertext = '';
		$this->ndir = '';
		$this->extra = '';
		$this->perpage = db_guinfo('hotrows');
		$this->special = 0;
		$this->from = 0;
	}

	function setrows($rows)
	{
		$this->rows = $rows;		
	}

	function genrelist($from=0,$to=0)
	{
		global $cfg;
		$this->query = "select *,count(free) as many, sum(lengths) as lengths from ".TBL_SEARCH." where genre = ".db_guinfo('defgenre').' and length(rtrim(album)) > 0 group by rtrim(album),genre having many > '.$cfg['titlesperalbum'].' order by artist';
		if ($from && $to) $this->query .= ' LIMIT '.$from.','.$to;	
		$this->header = get_lang(147);
		$this->ndir = get_lang(153, gengenres(db_guinfo('defgenre')));
	}

	function hotselect($char,$from=0,$to=0)
	{
		global $cfg;
		$this->query = 'SELECT *,count(free) AS many, sum(lengths) AS lengths FROM '.TBL_SEARCH.' WHERE ';
	
		switch($char)
		{
			case '*': $this->query .= 'rtrim(artist) NOT REGEXP("^[0-9a-zA-Z]")'; break;
			case '0': 
					for ($i=0;$i<10;$i++) 
					{
						$this->query .= 'rtrim(artist) like "'.$i.'%"';
						if ($i < 9) $this->query .= ' or ';
					}
					break;
			default: $this->query .= 'rtrim(artist) like "'.$char.'%"'; break;
		} 
		$this->query .= ' and length(rtrim(album)) > 0 group by rtrim(album),rtrim(artist) having many > '.$cfg['titlesperalbum'].' order by artist';
		if ($from && $to) $this->query .= ' LIMIT '.$from.','.$to;
		$this->headertext = get_lang(31, $char);
		$this->ndir = get_lang(30, $char);
	}

	function whats_hot($filter=0,$from=0,$to=0)
	{
		global $cfg;
		
		$this->from = $from;
		$this->ndir = get_lang(3);
		
		$lastcheck = mktime(0, 0, 0, date('n'), 1, date('Y'));
		$days = array(1 => 31, 2 => 28, 3 => 31, 4 => 30, 5 => 31, 6 => 30, 7 => 31, 8 => 31, 9 => 30, 10 => 31, 11 => 30, 12 => 31);

		$res = db_execquery('SELECT MIN(utime) FROM '.TBL_MHISTORY);
		$row = mysql_fetch_row($res);
		$uxstart = (int)$row[0];		
		
		$speriods = $periods = array();
		$cnt = 5;
		if ($uxstart < $lastcheck && $uxstart > 0)
		{
			while ($uxstart < $lastcheck)
			{
				$pr = date('Ym', $uxstart);
				$pry = date('Y', $uxstart);
				if (!isset($periods[$pry])) 
				{
					$periods[$pry] = array($cnt, date('Y', $uxstart));
					$cnt++;
				}
				if (!isset($periods[$pr])) 
				{
					$periods[$pr] = array($cnt, date($cfg['dateformatwhatshot'], $uxstart));
					$cnt++;
				}
				$uxstart += 2332800;
			}
		}

		$periods = array_reverse($periods, true);		
	
		if ($filter == 0) $filter = db_guinfo('hotmode');

		$uxfrom = 0;
		$uxto = time();

		$found = false;
		
		if ($filter >= 5)
		{
			foreach($periods as $pr => $val) 
			{
				if ($val[0] == $filter)
				{
					if (strlen($pr) == 4) // year
					{
						$found = true;
						$uxfrom = mktime(0, 0, 0, 1, 1, $pr);
						$uxto = mktime(23, 59, 59, 12, 31, $pr);
						$this->ndir .= ' '.$val[1];
					} else
					{
						$found = true;
						$y = substr($pr, 0, 4);
						$m = substr($pr, 4, 2);
						$uxfrom = mktime(0,0,0, $m, 1, $y);
						if (($y % 4 == 0) && $m == '02') $eday = 29; else $eday = $days[(int)$m];
						$uxto = mktime(0,0,0, $m, $eday, $y);
						$this->ndir .= ' '.$val[1];
					}
				}
			}
		}

		$this->special = 3;

		switch ($filter)
		{
			case 1:
				$uxfrom = mktime(0, 0, 0, date('n'), date('j') - 7, date('Y'));
				$uxto = mktime(23, 59, 59, date('n'), date('j'), date('Y'));
				$this->ndir .= ' '.get_lang(240);
				break;
			case 2:
				$uxfrom = mktime(0, 0, 0, date('n'), date('j') - 31, date('Y'));
				$uxto = mktime(23, 59, 59, date('n'), date('j'), date('Y'));
				$this->ndir .= ' '.get_lang(241);
				break;
			
			default:
				if (!$found)
				{
					$this->ndir .= ' '.get_lang(239);
					$this->special = 1;
					$this->query = 'select sum(hits) as cntr, artist, id, album, bitrate, date, sum(lengths) as lengths, genre, drive, count(free) as many, dirname, free, fsize from '.TBL_SEARCH.' where rtrim(album) != "" group by album,artist having cntr >= '.$cfg['whatshotminimumhits'].' and many > '.$cfg['titlesperalbum'].' order by cntr desc, many desc';
				}
				break;
		}

		if ($this->special == 3) $this->query = 'SELECT s.*,count(*) as many, sum(h.dpercent) as rate from '.TBL_MHISTORY.' h, '.TBL_SEARCH.' s where h.utime >= '.$uxfrom.' AND h.utime <= '.$uxto.' AND trim(s.album) != "" AND h.s_id = s.id group by s.album,s.artist having many >= '.$cfg['whatshotminimumhits'].' order by many desc';

		if ($from && $to) $this->query .= ' LIMIT '.$from.','.$to;

		$fsel = array(0 => '', 1 => '', 2 => '');
		$fsel[$filter] = ' selected="selected"';

		$extra = ''.get_lang(238).':  ';		
		$extra .= '';
		$extra .= ''.get_lang(239).'';
		$extra .= ''.get_lang(240).'';
		$extra .= ''.get_lang(241).'';
	
		foreach($periods as $pr => $val)
		{
			$extra .= '';
		}
	
		$extra .= ' ';
		$extra .= '';	
		$extra .= '';
		$this->extra = $extra;
		$this->headertext = get_lang(3);
	}

	function whats_new($from=0, $to=0)
	{
		$this->query = 'select *,count(free) as many,sum(lengths) as lengths from '.TBL_SEARCH.' where rtrim(album) != "" group by album,artist order by date desc';
		if ($from && $to) $this->query .= ' LIMIT '.$from.','.$to;

		$this->headertext = get_lang(4);
		$this->ndir = get_lang(4);
		$this->special = 2;
		$this->extra = '';
	}
	
	function nhghlist($extra = '')
	{
		global $cfg;	
		
		showdir('',$this->ndir,0);

		echo $this->extra;

		if (!$this->rows)
		{
			$result = db_execquery($this->query);
			$this->rows = mysql_num_rows($result);
		} else $result = db_execquery($this->query, true); 
		
		$cntr= $this->from;
		$many = 0;			
		
		echo '';
		while ($row = mysql_fetch_array($result)) 
		{
			$f2 = new file2($row['id'], false, $row);			
			$dir = $f2->relativepath;
			$many++;
			if ($many > $this->perpage) break;
			$ainf = gen_aheader($row['album'], $row['artist'], $row['lengths'], $row['many']);		
		
			switch ($this->special)
			{
				case 0: echo print_dir($row['drive'],$row['artist'].' - '.$row['album'], $dir, -1, 'link.gif', $row['artist'], $ainf, '', true, 0, $row['id']); 
						break;

				case 1: echo print_dir($row['drive'],' '.lzero($cntr+1).' '.$row['artist'].' -  '.$row['album'], $dir, -1, 'link.gif',$row['cntr'].' hits - '.$row['many'].' tunes', $ainf, '', true, $row['cntr'], $row['id']);							
						$cntr++;						
						break;

				case 2: 
						//if ($row['many'] > 1) 
							echo print_dir($row['drive'],date($cfg['dateformat'],$row['date']).' - '.$row['artist'].' - '.$row['album'], $dir, -1, 'link.gif',$row['artist'],$ainf, '', true,0, $row['id']); 
						//else print_file($row['id'],1,1,$f2,$row['id']);
						break;
				
				
				case 3: echo print_dir($row['drive'], ' '.lzero($cntr+1).' '.$row['artist'].' -  '.$row['album'], $dir, -1, 'link.gif', '', null, '', true, $row['many'], $row['id']);							
						$cntr++;
						break;
			}
		}
		if (!$many) echo ''.get_lang(10).'';		
	}

	function endlist()
	{
		endmp3table(0);
	}
}

function genliststart($id)
{
	$gl = new genlist();
	switch($id)
	{
		case 3: $gl->whats_new(); break;
		case 4: $gl->whats_hot(); break;
		case 6: $gl->genrelist(); break;
	}
	
	kprintheader($gl->headertext, 1); 
	$kpd = new kpdesign();
	$kpd->top();
	
	$gl->nhghlist();
	$nv = new navi($id, $gl->rows, true);
	$nv->writenavi();
	$gl->endlist();
	$kpd->bottom();
	kprintend();
}

function hotselect($char='')
{
	$gl = new genlist();
	$gl->hotselect($char);
	kprintheader($gl->headertext, 1); 
	$kpd = new kpdesign();
	$kpd->top();
	$gl->nhghlist();
	$nv = new navi(5, $gl->rows, true);
	$nv->setfollow('hchar', $char);
	$nv->writenavi();
	$gl->endlist();
	$kpd->bottom();
	kprintend();
}

function updatehotlist()
{
	$hotsels = '';
	$qres = db_execquery('SELECT LOWER(SUBSTRING(artist,1,1)) AS ch FROM '.TBL_SEARCH.' WHERE TRIM(album) != "" AND TRIM(artist) != "" GROUP BY SUBSTRING(artist,1,1)', true);
	while ($row = mysql_fetch_row($qres)) $hotsels .= $row[0];
	updatecache(10, $hotsels);
	return $hotsels;
}

function album_hotlist($type)
{
	global $PHP_SELF;
	$alf = '*0abcdefghijklmnopqrstuvwxyz';
	$chlist = $alfa = array();
	for ($i=0,$c=strlen($alf);$i<$c;$i++) $alfa[] = $alf[$i];

	$hotsels = '';
	if (!getcache(10, $hotsels)) $hotsels = updatehotlist();
		
	for ($i=0,$c=strlen($hotsels);$i<$c;$i++) if (is_numeric($hotsels[$i])) $chlist['0'] = true; else $chlist[$hotsels[$i]] = true;
	$out = '';
	
	$pcnt = floor(100 / strlen($alf));

	for ($i=0,$c=strlen($alf);$i<$c;$i++)
	{
		$add = false;
		if ($i == 0)
		{
			foreach ($chlist as $tch => $val) if (!in_array($tch, $alfa)) $add = true; 
		} else
			if (isset($chlist[$alf[$i]])) $add = true;

		if ($add)
			$out .= ''; 
		else 
			$out .= '';
	}
	$out .= '
'.$alf[$i].'
'.$alf[$i].'
';
	return $out;
}

function updategenre()
{
	$res = db_execquery('SELECT genre,count(*) as cnt FROM '.TBL_SEARCH.' WHERE genre != 255 AND TRIM(album) != "" GROUP BY genre ORDER BY genre', true);
	$data = '';
	while ($row = mysql_fetch_array($res)) $data .= $row[0].'-'.$row[1].',';
	updatecache(20, $data);
	return $data;
}

function genre_select($top = true, $default)
{
	$glist = $glistid = $glistcnt = array();
	$genredata = '';
	if (!getcache(20, $genredata)) $genredata = updategenre();

	$genrenames = gengenres();

	if ($top) $genres = ''; else $genres = '';
	
	$genrerows = explode(',', $genredata);
	
	$cnt = 0;
	for ($i=0,$c=count($genrerows);$i<$c;$i++)
	{
		$ln = explode('-', $genrerows[$i]);
		if (count($ln) == 2)
		{
			if (isset($genrenames[$ln[0]]))	
			{
				$gname = $genrenames[$ln[0]];
				$glist[$cnt] = checkchs($gname);
				$glistid[$cnt] = $ln[0];
				$glistcnt[$cnt] = $ln[1];
				$cnt++;
			}
		}
	}

	if ($cnt > 0)
	{
		array_multisort($glist, $glistid, $glistcnt, SORT_STRING);
		for ($i=0;$i<$cnt;$i++)
		{
			$selected = false;
			if (is_array($default))
			{
				foreach($default as $name) if ($name == $glistid[$i]) $selected = true;
			} else if ($glistid[$i] == $default) $selected = true;
			if ($selected)
			$genres .= ''.$glist[$i].' ('.$glistcnt[$i].')'; 
				else
			$genres .= ''.$glist[$i].' ('.$glistcnt[$i].')';
		}
	} else $genres .= ''.get_lang(10).'';
	if ($top) $genres .= '';
	return $genres;
}

function nextch($ssearch,$pos)
{
	for ($i=$pos,$c=strlen($ssearch);$i<$c;$i++) 
		if ($ssearch[$i] != ' ') return $i-1;
	return strlen($ssearch);
}

class kpsearch
{
	function kpsearch()
	{
		$this->id3 = db_guinfo('defaultid3');
		$this->hitsas = db_guinfo('hitsas');
		$this->where = db_guinfo('defaultsearch');
		$this->what = trim(stripslashes(fruser('searchfor')));
		$this->files = 0;
		$this->query = '';
		$this->mwritten = 0;
		$this->rows = 0;
	}

	function setrows($rows)
	{
		$this->rows = $rows;
	}

	function getwords($text)
	{
		$i2 = $quote = $squote = 0;
		$words = array(0 => '');
	
		$squotes = substr_count ($text, "'");
		$dblquotes = substr_count ($text, '"');

		$chars = 0;

		for ($i=0,$c=strlen($text);$i<$c;$i++)	
		{		
			switch ($text[$i])
			{
				case ';':	break;			
				
				case ' ':	if (!$quote && !$squote)
							{
								$i2++;
								$words[$i2] = '';
								$i = nextch($text,$i);
								break;
							} else $words[$i2] .= $text[$i];
				case '"':	$dblquotes--;
							if ($quote) 
							{
								$quote = 0; 
								break;
							} else if ($dblquotes > 0) 
							{
								$quote = 1; 
								break;
							}
							break;
				case "'":	$squotes--;
							if ($squote) 
							{
								$squote = 0; 
								break;
							} else if ($squotes > 0) 
							{
								$squote = 1; 
								break;
							}
				default:	$chars++;
							$words[$i2] .= $text[$i];
							break;						
			}		
		}
		if (!$chars) return false; else return $words;
	}
	
	function gensearchsql($from=0, $to=0)
	{
		$subquery = '';
		
		$words = $this->getwords($this->what);
			
		for ($i=0,$c=count($words);$i<$c;$i++)
		{
			switch ($words[$i][0])
			{
				case '-':	$search = mysql_escape_string(substr($words[$i],1));
							$ident = 'NOT LIKE';
							break;
				case '+':	$search = mysql_escape_string(substr($words[$i],1));
							$ident = 'LIKE';
							break;
				default:	$search = mysql_escape_string($words[$i]);
							$ident = 'LIKE';
							break;
			}
			switch ($this->where)
			{
				case 0: if (!$this->id3) $subquery .= 'concat(album,dirname,free) '.$ident.' "%'.$search.'%"'; else
						$subquery .= 'album '.$ident.' "%'.$search.'%"';
						break;
				case 1: if (!$this->id3) $subquery .= 'concat(title,dirname,free) '.$ident.' "%'.$search.'%"'; else
						$subquery .= 'title '.$ident.' "%'.$search.'%"';
						break;
				case 2: if (!$this->id3) $subquery .= 'concat(artist,dirname,free) '.$ident.' "%'.$search.'%"'; else
						$subquery .= 'artist '.$ident.' "%'.$search.'%"';
						break;
				case 3: if (!$this->id3) $subquery .= 'concat(album,artist,title,dirname,free) '.$ident.' "%'.$search.'%"'; else
						$subquery .= 'concat(album,artist,title) '.$ident.' "%'.$search.'%"';
						break;
			}		
			if (($i+1) < $c) $subquery .= ' AND ';	
		}

		if ($this->hitsas == 1) $extra = ',COUNT(free) AS many, SUM(lengths) AS lengths'; else $extra = '';
		
		$query = 'SELECT *'.$extra.' FROM '.TBL_SEARCH.' WHERE f_stat = 0 AND '.$subquery;
		
		if ($this->hitsas == 1) $query .= ' AND LENGTH(rtrim(album)) > 0 GROUP BY RTRIM(album),RTRIM(artist)';
		
		$query .= ' ORDER BY dirname, free ASC';

		if ($from && $to) $query .= ' LIMIT '.$from.','.$to;
	
		return $this->query = $query;
	}

	function viewsearch()
	{
		global $cfg;

		$kqm = new kq_Measure();
		$kqm->start();
		if (!$this->rows) $result = db_execquery($this->query); else $result = db_execquery($this->query, true);
		$kqm->stop();

		if (!$this->rows) $this->rows = mysql_num_rows($result);
		$this->mwritten =0;

		$max = db_guinfo('searchrows');
		$extra = '';
		if ($this->rows > $max) $extra = get_lang(6, $max); 
		showdir('',get_lang(8, $this->what),0);
		echo ' - '.get_lang(9).' '.$this->rows.' '.$extra.' / '.$kqm->result(3).' '.get_lang(7).'';
		echo '';
		$filter = 0;

		while ($row = mysql_fetch_array($result)) 
		{
			if ($this->mwritten+1 > $max) break;
			$f2 = new file2($row['id'], false, $row);
			$fdesc = new filedesc($f2->fname);
			if ($fdesc->view && $f2->ifexists())
			{
				switch ($this->hitsas)
				{
					case 0: print_file($row['id'],1,1,$f2,$row['id']);
							$this->files++;
							break;
							
					case 1: $ainf = gen_aheader($row['album'], $row['artist'], $row['lengths'], $row['many']);		
							echo print_dir($row['drive'],date($cfg['dateformat'], $row['date']).' - '.$row['artist'].' - '.$row['album'], $f2->relativepath, -1, 'link.gif',$row['artist'],$ainf,$this->what, true, 0, $row['id']);
							break;
				}			
				$this->mwritten++;
			} else $filter++;
		}
		if ($this->rows==0) echo ''.get_lang(10).'';
		if ($filter>0) echo ''.get_lang(264,$filter).'';		
	}

	function endsearch()
	{		
		endmp3table(0, 0, $this->files);	
	}
}

class navi
{
	function navi($navid = 0, $rows = 0, $start=false, $pos=0)
	{
		$this->navid = fruser('navid', true);
		if (!$this->navid) $this->navid = $navid;

		$this->start = $start;
		$this->navrows = fruser('navrows', true);
		$this->navpos = fruser('navpos', true);
		
		if ($this->start)
		{
			$this->navrows = $rows;
			$this->navpos = $pos;
		}
		
		switch($this->navid)
		{
			case 2: $this->header = get_lang(5); break;
			case 3: $this->header = get_lang(4); break;
			case 4: $this->header = get_lang(3); break;
			case 5: $this->header = $this->headertext = get_lang(31, fruser('hchar')); break;
			case 6: $this->header = get_lang(147); break;
		}

		if ($this->navid == 2) $this->perpage = db_guinfo('searchrows'); else
				$this->perpage = db_guinfo('hotrows');

		$this->searchfor =  fruser('searchfor');	
		
		$this->follow = array();
	}

	function setfollow($name, $value)
	{
		$this->follow[] = array($name, $value);
	}

	function writepagelink($page, $mark=0)
	{
		global $PHP_SELF;
		if ($page == $mark) $class = 'filemarked'; else $class = 'hot';
		
		$extra = '';
		for ($i=0,$c=count($this->follow);$i<$c;$i++) $extra .= '&'.$this->follow[$i][0].'='.$this->follow[$i][1];
		
		return ''.$page.' '; 
	}

	function searchnavi($direction, $pos=0)
	{
		if ($direction == 1) $this->navpos = $this->navpos + $this->perpage; else if ($direction == 0) $this->navpos = $this->navpos - $this->perpage;
		if ($pos != 0) $this->navpos = ($pos * $this->perpage);

		if ($this->navpos < 0) $this->navpos = 0;
			else
		if ($this->navpos % $this->perpage != 0)
			$this->navpos = ceil($this->navpos / $this->perpage) * $this->perpage;
		
		switch($this->navid)
		{
			case 2: // normal search
				$kps = new kpsearch();
				$kps->setrows($this->navrows);
				$kps->gensearchsql($this->navpos, $this->perpage);
				$kps->viewsearch();
				$this->writenavi();
				$kps->endsearch();	
				break;		

			default:
				$gl = new genlist();
				$gl->setrows($this->navrows);

				switch ($this->navid)
				{
					case 3: $gl->whats_new($this->navpos, $this->perpage); break;
					case 4: $gl->whats_hot(0, $this->navpos, $this->perpage); break;
					case 5: $this->setfollow('hchar', fruser('hchar'));
							$gl->hotselect(fruser('hchar'), $this->navpos, $this->perpage);
							break;
					case 6: $gl->genrelist($this->navpos, $this->perpage); break;
				}

				$gl->nhghlist();
				$this->writenavi();
				$gl->endlist();	
				break;
		}
	}

	function writenavi()
	{
		if ($this->navrows > $this->perpage)
		{		
			echo '';		
			echo '';
			if ($this->navpos + $this->perpage >= $this->navrows) $disright = ' disabled="disabled"'; else $disright = '';
			if ($this->navpos > 0) $disleft = ''; else $disleft = ' disabled="disabled"';		
			echo '';
			echo '';
			echo '';
			echo '';
			echo '  ';
			echo '  ';		
				
			for ($i=0,$c=count($this->follow);$i<$c;$i++) 
			echo '';

			$pages = ceil($this->navrows / $this->perpage);
			$curpage = ceil($this->navpos / $this->perpage) + 1;

			echo ''.get_lang(279).'';

			if ($pages < 10) for ($i=0;$i<$pages;$i++) echo $this->writepagelink($i+1, $curpage);
			else
			{
				for ($i=0;$i<4;$i++) echo $this->writepagelink($i+1, $curpage);
						
				if ($curpage >= 4 && ($curpage + 2) < $pages)
				{
					echo ' .. ';
					if (($curpage - 3) <= 4) 
					{
						$start = 5;					
						$endpage = $curpage + 7;
					} else 
					{
						$start = $curpage - 3;
						$endpage = $curpage + 4;
					}

					for ($i=$start;$i < $endpage;$i++) 
					{
						if ($i > ($pages - 4)) break;
						echo $this->writepagelink($i, $curpage);
					}
				}			
				echo ' .. ';
				for ($i=$pages-4;$i<$pages;$i++) echo $this->writepagelink($i+1, $curpage);
			}	
			echo '';
		}
	}
}

function md5file($file)
{
	$fp = fopen($file, "rb");
	if ($fp)
	{
		$md5data = fread($fp, 12284);
		fclose($fp);	
		return md5($md5data);
	}
	return null;
}

function getrelative($dir)
{
	$dirout = dirname($dir);
	if ($dirout == '.') $dirout = ''; 
		else 
	$dirout .= '/';
	return $dirout;
}

function search_qupdorins($id, $finf, $filein, $md5, $drive, $mtime, $f_stat, $fsize)
{
	if ($id > 0) $sql = 'UPDATE '; else $sql = 'INSERT INTO ';	
	
	$sql .= TBL_SEARCH.' SET title = "'.mysql_escape_string($finf['title']).'", album = "'.mysql_escape_string($finf['album']).'", artist = "'.mysql_escape_string($finf['artist']).'", md5 = "'.$md5.'", free = "'.mysql_escape_string(basename($filein)).'", genre = '. vernumset($finf['genre'],255).', lengths = '.$finf['lengths'].', ratemode = '.$finf['ratemode'].', bitrate = '.$finf['bitrate'].', drive = '.$drive.', mtime = '.$mtime.', dirname = "'.mysql_escape_string(getrelative($filein)).'", f_stat = '.$f_stat.', fsize = '.$fsize.', track = '.$finf['track'].', year = '.$finf['year'].', comment = "'.mysql_escape_string($finf['comment']).'"';
	if ($id > 0) $sql .= ' WHERE id = '.$id; else $sql .= ', date = '.time();
	return $sql;
}

function search_qupdfree($free, $drive, $id)
{
	return 'UPDATE '.TBL_SEARCH.' SET free = "'.mysql_escape_string(basename($free)).'", dirname = "'.mysql_escape_string(getrelative($free)).'", drive = '.$drive.' WHERE id = '.$id;
}

function search_findid($free)
{
	$fsize = filesize($free);
	$md5 = md5file($free);
	if (!empty($md5))
	{
		$query = 'SELECT id FROM '.TBL_SEARCH.' WHERE md5 = "'.$md5.'" AND fsize = '.$fsize;
		$result = db_execquery($query);
		$row = mysql_fetch_array($result);
       		$cnt = mysql_num_rows($result);
		if ($cnt > 0) return $row['id']; else return 0;
	} 	
}

function updatesingle($free)
{
	global $base_dir;
	$id = search_findid($free);
	$fid = get_file_info($free);

	$drive = -1;
	for ($i=0;$i
	
	
		
		
		
		
	
		
		
		
	
	
		
		
		
	
	
	
		
		getchecked('followsymlinks'); ?>/>
		
	
	
	

	
		
		 
		
		
	
	
	
	
		
	'.get_lang(296, ''.$fixurl.'').'

';
	echo ''.get_lang(136).'..
';
	flush();

	$data = array();
	$basedirlen = array();
	$datacnt = 0;
	
	$kqm = new kq_Measure();
	$kqm->start();

	echo '
';
	echo '

';

	$cnt = 0;

	for ($i=0,$c=count($base_dir);$i<$c;$i++)
	{
		$grabdata = array();
		GetDirArray($base_dir[$i], $grabdata, $cnt);
		$basedirlen[$i] = strlen($base_dir[$i]);
		$data[$i] = $grabdata;
		$datacnt += count($data[$i]);
	}
	
	if ($datacnt > 0)
	{
		$result = db_execquery ('SELECT count(*) FROM '.TBL_SEARCH);
		$row = mysql_fetch_row($result);
		$dbrows = $row[0];
		$result = db_execquery ('SELECT count(*) FROM '.TBL_SEARCH.' WHERE dirname = "0"');
		$row = mysql_fetch_row($result);
		$forupdate = $row[0];

		if ($dbrows == $forupdate) $updateall = true;
		$result = db_execquery('SELECT fsize, id, md5, free, drive, mtime, dirname FROM '.TBL_SEARCH.' ORDER BY id ASC', true);

		$dcntr=0;
		
		while ($row = mysql_fetch_row($result)) 
		{
			$db_out[$dcntr++] = $row;

			if (!isset($db_mtime[$row[0]][$row[5]])) $db_mtime[$row[0]][$row[5]] = $dcntr - 1;
			if (!isset($db_unique[$row[0]][$row[2]])) $db_unique[$row[0]][$row[2]] = $dcntr - 1;

			$path = crc32($row[6].$row[3]);

			if (isset($db_path[$path]))
			{
				$ids = $db_path[$path];
				$ids[] = $dcntr; 
				$db_path[$path] = $ids;
			} else $db_path[$path] = array($dcntr);
		}

		if ($updateall) $db_mtime = array();
		
		$query = null;
				
		updateup_status(get_lang(18, $datacnt));

		$totalqupds = $dcntr;	
		$totalins = $datacnt;
		$qins = $qupd = $failed = $qupdins = $skips= $qdels = $fdups = 0;

		if ($datacnt > 0)
		{
			for ($drive=0,$drivec=count($data);$drive<$drivec;$drive++)
			{
				for ($i=0,$ic=count($data[$drive]);$i<$ic;$i++)
				{
					$file = $data[$drive][$i];
					$filein = substr($file, $basedirlen[$drive]);

					if ($i % 50 == 0 || $debugmode)
					{
						$countups = $qupd + $qupdins;
						$out = get_lang(20,$qins,$countups);
						$out .= (strlen($filein) > 60) ? addslashes(substr($filein,0,60)).'...' : addslashes($filein);
						updateup_status($out, 'up_status');
					}					

					$fsize = filesize($file);
					$mtime = filemtime($file);

					if (!$fsize)
					{						
						echo ''.get_lang(19,$file).'
';
						flush();
						$skips++;
						continue;
					}

					$filecntr++;
					if (isset($db_mtime[$fsize][$mtime]))
					{
						$i2 = @$db_mtime[$fsize][$mtime];
						if ($db_out[$i2][0] != -1 && $db_out[$i2][6].$db_out[$i2][3] == $filein && $db_out[$i2][4] == $drive)
						{
							$db_out[$i2][0] = -1;						
							$qupd++;
							continue;						
						}
					}
					
					$md5 = md5file($file);
					if ($sleeptrans > 0 && !$win32) usleep($sleeptrans);

					if (!empty($md5))
					{
						if (isset($db_unique[$fsize][$md5])) 
						{
							$idupdate = $db_unique[$fsize][$md5]; 
	
							if ($db_out[$idupdate][0] == -1)
							{
								$checkf = $base_dir[$db_out[$idupdate][4]]. $db_out[$idupdate][6].$db_out[$idupdate][3];
															
								
								/* duplicate check - not in production
								$identical = false;
								$fp1 = fopen($checkf, 'rb');
								$fp2 = fopen($file, 'rb');
								if ($fp1 && $fp2)
								{
									$identical = true;
									while (!feof($fp1))
									{
										$data1 = fread($fp1, 32768);
										$data2 = fread($fp2, 32768);
										if (strcmp($data1,$data2) != 0) 
										{
											$identical = false;
											break;
										}
									}									
									fclose($fp1);
									fclose($fp2);
								}

								if ($identical) $extra = '! '; else $extra = '';*/

								echo ''.get_lang(168, $file, $checkf).'

';
								$fdups++;

								continue;								
							}
						} else $idupdate = -1;

						if ($idupdate != -1)
						{
							$db_out[$idupdate][0] = -1;

							if ($updateall) $db_out[$idupdate][5] = 0;
	
							if ($mtime != $db_out[$idupdate][5])
							{
								$fid = get_file_info($file);								
								$query = search_qupdorins($db_out[$idupdate][1], $fid, $filein, $md5, $drive, $mtime, 0, $fsize);
								$qupdins++;
							}
							else
							if ($db_out[$idupdate][6].$db_out[$idupdate][3] != $filein || $db_out[$idupdate][4] != $drive)
							{
								$query = search_qupdfree($filein, $drive, $db_out[$idupdate][1]);
								$qupdins++;
							}							
						} 
						else
						{
							$frel = getrelative($filein);
							$ffilein = basename($filein);
							$checkex = crc32($frel.$ffilein);
							$useid = -1;
							if (isset($db_path[$checkex]))
							{
								$ids = $db_path[$checkex];
								for ($i3=0,$c3=count($ids);$i3<$c3;$i3++)
								{
									$cid = $ids[$i3] - 1;
									if ($db_out[$cid][3] == $ffilein && $db_out[$cid][6] == $frel)
									{
										$useid = $cid;
										break;
									}
								}							
							}

							$fid = get_file_info($file);								
							
							if ($useid == -1) 
							{
								$query = search_qupdorins(0, $fid, $filein, $md5, $drive, $mtime, 0, $fsize);	
								$db_out[$dcntr++] = array(-1, 0, $md5, $filein, $drive, $mtime, $filein);
								$db_unique[$fsize][$md5] = $dcntr-1;
								$qins++;
							} else
							{
								$query = search_qupdorins($db_out[$useid][1], $fid, $filein, $md5, $drive, $mtime, 0, $fsize);
								$db_out[$useid][0] = -1;
								$qupdins++;
							}
						}

						if ($query !== null)
						{
							$result = db_execquery($query, true);

							if (!$result)
							{
								$failed++;
								echo ''.get_lang(22, $query).'
';
							}
							$query=null;
						}
					} else
					{
						echo ''.get_lang(23,$file).'
';
						flush();
						$skips++;
					}
				} // end of file loop
			} // end of drive loop
		} // if found any files
		$fordel = 0;
		for ($i2=0;$i2<$dcntr;$i2++)
		if ($db_out[$i2][0] != -1) $fordel++;

		if ($deleteunused)
		{		
			if ($skips == 0)
			{
				for ($i2=0;$i2<$dcntr;$i2++)
				if ($db_out[$i2][0] != -1) 
				{
					echo ''.get_lang(24, $db_out[$i2][6].$db_out[$i2][3]);
					$result = db_execquery('DELETE FROM '.TBL_SEARCH.' WHERE id = '.$db_out[$i2][1], true);
					if ($result) $qdels++;
					echo '
';
					$fordel = 0;
				}
			}
		}
		$kqm->stop();
		updateup_status(get_lang(26), 'up_status');
		echo ''.get_lang(25, $qins, $qupdins, $qdels, $failed, $skips, $filecntr, $kqm->result(3), $fordel);
		echo '

';
		echo '
';
	} 
	else
	{
		$prbasedir='';
		for ($i=0;$i'.get_lang(28, $prbasedir).'
';
	}
	kprintend();
	updategenre();
	updatehotlist();
	
}

function search_updateautomatic($user, $host, $waittrans=0)
{
	global $cfg;

	if ($cfg['autoupdate'])
	{
		if ($host == $cfg['autoupdatehost'] && $user == $cfg['autoupdateuser'])
		{ 
			$options = array('deleteunused', 'rebuildid3', 'debugmode');
			$options['deleteunused'] = 0;
			$options['rebuildid3'] = 0;
			$options['debugmode'] = 0;
			$options['sleeppertrans'] = $waittrans;
			search_updatelist($options);
		} else echo "Wrong host ($host) or user ($user) for update.";
	} 
	die();
}


function getarchiveline($archiver, $destination, $file, $flist = '')
{
	global $archivers;
	if (isset($archivers[$archiver]))
	if ($archivers[$archiver][0])
	{
		$out = $archivers[$archiver][2];
		$out = str_replace('%D', $destination, $out); 
		$out = str_replace('%F', $file, $out); 
		$out = str_replace('%LIST', $flist, $out);
		return $out;
	}
	return 0;
}

function gengenres($id=255)
{
	$genres = array(0   => 'Blues', 1 => 'Classic Rock', 2 => 'Country', 3 => 'Dance', 4 => 'Disco', 5 => 'Funk', 6 => 'Grunge',
					7   => 'Hip-Hop',8  => 'Jazz', 9   => 'Metal', 10  => 'New Age', 11  => 'Oldies', 12  => 'Other', 13  => 'Pop',
					14  => 'R&B', 15 => 'Rap',	16  => 'Reggae', 17  => 'Rock', 18  => 'Techno', 19  => 'Industrial', 20  => 'Alternative',
					21  => 'Ska', 22 => 'Death Metal', 23  => 'Pranks', 24  => 'Soundtrack', 25  => 'Euro-Techno', 26  => 'Ambient',
					27  => 'Trip-Hop', 28  => 'Vocal', 29  => 'Jazz+Funk', 30  => 'Fusion', 31  => 'Trance', 32  => 'Classical',
					33  => 'Instrumental', 34  => 'Acid', 35  => 'House', 36  => 'Game', 37  => 'Sound Clip', 38  => 'Gospel',
					39  => 'Noise', 40  => 'Alternative Rock', 41  => 'Bass', 42  => 'Soul', 43  => 'Punk', 44  => 'Space',
					45  => 'Meditative', 46  => 'Instrumental Pop', 47  => 'Instrumental Rock', 48  => 'Ethnic', 49  => 'Gothic',
					50  => 'Darkwave', 51 => 'Techno-Industrial', 52  => 'Electronic', 53  => 'Pop-Folk', 54  => 'Eurodance',
					55  => 'Dream', 56  => 'Southern Rock', 57  => 'Comedy', 58  => 'Cult', 59  => 'Gangsta', 60  => 'Top 40',
					61  => 'Christian Rap', 62  => 'Pop/Funk', 63  => 'Jungle', 64  => 'Native US', 65  => 'Cabaret',
					66  => 'New Wave', 67 => 'Psychadelic', 68  => 'Rave', 69  => 'Showtunes', 70 => 'Trailer',
					71  => 'Lo-Fi', 72  => 'Tribal', 73  => 'Acid Punk', 74  => 'Acid Jazz', 75  => 'Polka', 76  => 'Retro',
					77  => 'Musical', 78 => 'Rock & Roll', 79  => 'Hard Rock', 80  => 'Folk', 81  => 'Folk-Rock',
					82  => 'National Folk', 83  => 'Swing', 84  => 'Fast Fusion', 85  => 'Bebob', 86  => 'Latin',
					87  => 'Revival', 88 => 'Celtic', 89  => 'Bluegrass', 90  => 'Avantgarde', 91  => 'Gothic Rock',
					92  => 'Progressive Rock', 93  => 'Psychedelic Rock', 94  => 'Symphonic Rock', 95  => 'Slow Rock',
					96  => 'Big Band', 97 => 'Chorus', 98  => 'Easy Listening', 99  => 'Acoustic', 100 => 'Humour',
					101 => 'Speech', 102 => 'Chanson', 103 => 'Opera', 104 => 'Chamber Music', 105 => 'Sonata',
					106 => 'Symphony', 107 => 'Booty Bass', 108 => 'Primus', 109 => 'Porn Groove', 110 => 'Satire',
					111 => 'Slow Jam', 112 => 'Club', 113 => 'Tango', 114 => 'Samba', 115 => 'Folklore', 116 => 'Ballad',
					117 => 'Power Ballad', 118 => 'Rhytmic Soul', 119 => 'Freestyle', 120 => 'Duet', 121 => 'Punk Rock',
					122 => 'Drum Solo', 123 => 'Acapella', 124 => 'Euro-House', 125 => 'Dance Hall', 126 => 'Goa',
					127 => 'Drum & Bass', 128 => 'Club-House', 129 => 'Hardcore', 130 => 'Terror', 131 => 'Indie',
					132 => 'BritPop', 133 => 'Negerpunk', 134 => 'Polsk Punk', 135 => 'Beat', 136 => 'Christian Gangsta Rap',
					137 => 'Heavy Metal', 138 => 'Black Metal', 139 => 'Crossover', 140 => 'Contemporary Christian',
					141 => 'Christian Rock', 142 => 'Merengue', 143 => 'Salsa', 144 => 'Trash Metal', 145 => 'Anime',
					146 => 'Jpop', 147 => 'Synthpop'
		    );

	if ($id != 255)
	{
		if (isset($genres[$id])) return $genres[$id];
	} else return $genres;
}

function findmusic()
{
	global $PHP_SELF, $win32, $setctl;
	kprintheader(get_lang(289),0);
	
	if (isset($_POST['paths'])) $paths = str_replace("\r\n", "\n", $_POST['paths']); else $paths = '';

	echo '
';
	$data = array();

	if (isset($_POST['useselected']))
	{
		$nbasedir = '';
		foreach($_POST['selected'] as $name => $val) $nbasedir .= $val.';';		
		$setctl->set('base_dir', basedir_rewrite($nbasedir));
		$setctl->set('basedir_changed', 1);
		?>
		
		
	
			
	
	 0)
	{
		foreach($data as $name => $cnt)
		{
			$useselected = true;
			echo '';
		}
	}
	?>
	

	
	
	
';
			echo ' '.$name.' '.get_lang(18, $cnt);
			echo '

		

	
	

		
<?php echo $paths; ?>
	
	

		

		'; ?>
		
		
	
	
	
	 0)
		{
			for ($i=0,$c=count($flist);$i<$c;$i++)
			{
				$val = $flist[$i];
				if ($val != '.' && $val != '..')
				{
					if (@is_file($spath.$val) && !is_dir($spath.$val))
					{
						$cnt++;
						if ($cnt % 100 == 0) updateup_status(get_lang(253)." ".$cnt);

						if (isset($cfg['detecttypes'][file_extension($val)]))
						{
							$dirse = explode('/', $spath);
							$cpath = '';
							$found = false;
							$cpath = $dirse[0];
							for ($i2=1,$c2=count($dirse);$i2<$c2;$i2++)
							{
								$cpath .= '/'.$dirse[$i2];
								if (isset($data[$cpath.'/'])) 
								{
									$data[$cpath.'/']++;
									$found = true;
									break;
								}
							}							
							if (!$found) $data[$spath] = 1;
						}
					}
				}
			}
			for ($i=0,$c=count($flist);$i<$c;$i++)
			{
				$val = $flist[$i];
				if ($val != '.' && $val != '..' && @is_dir($spath.$val) && !is_link($spath.$val)) GetDirArrayLight($spath.$val.'/', $data, $cnt);
			}
		}
	}
}

function GetDirArray($spath, &$data, &$cnt)
{
	$flist = array();
	$flistcnt = 0;
	if (@$handle=opendir($spath))
	{
		while ($file = readdir($handle)) $flist[$flistcnt++] = $file;
		closedir($handle);

		if ($flistcnt > 0)
		{
			for ($i=0;$i<$flistcnt;$i++)
			{
				$val = $flist[$i];
				if ($val != '.' && $val != '..')
				{
					if ($cnt % 100 == 0) updateup_status($cnt);

					if (is_dir($spath.$val)) 
					{
						if (is_link($spath.$val) && !FOLLOWSYMLINKS) continue;
						GetDirArray($spath.$val.'/', $data, $cnt);
					} else 
					if (file_type($val) != -1) 
					{
						$data[] = $spath.$val;
						$cnt++;
					}
				}
			}
		}
	}
}

class kparchiver
{
	function kparchiver()
	{
		$this->files = array();
	}
	
	function setfile($file)
	{
		$this->files[] = $file;
	}

	function execute()
	{
		global $win32, $cfg, $archivers, $PHP_SELF, $u_id;

		$listmode = false;

		kprintheader(get_lang(260),0);
		echo '
0%

';
		flush();
		
		$usearc = 0;
		$preferarc = db_guinfo('archer');
		if (isset($archivers[$preferarc]) && $archivers[$preferarc][0] == 1) $usearc = db_guinfo('archer');
		$tf = tempnam($cfg['archivetemp'], 'kppack');
		$f = $tf . '.'.$archivers[$usearc][1];

		if (strpos($archivers[$usearc][2],'%LIST') !== false) $listmode = true;
		
		$cwd = getcwd();
	
		$f2 = false;
		$files = 0;
		for ($i=0,$c=count($this->files);$i<$c;$i++)
		{
			$f2 = new file2($this->files[$i]);
			if ($f2->ifexists()) 
			{
				if ($listmode)
				{
					$fp = fopen($tf, 'a');
					if ($fp) 
					{
						fwrite($fp, $f2->fullpath.$cfg['archivefilelist_cr']);
						fclose($fp);
					}
				}
				$files++;
			}
		}

		if ($listmode)
		{
			if ($f2)
			{
				$run = getarchiveline($usearc, $f, $f2->getfullpath($win32), $tf);
				if ($cfg['archivemodedebug']) echo($run); else exec($run);
				echo '';
			}
		} else
		{
			$cnt = 0;
			for ($i=0,$c=count($this->files);$i<$c;$i++)
			{
				$f2 = new file2($this->files[$i]);
				if ($f2->ifexists()) 
				{
					chdir($f2->getdrivedir());
					$run = getarchiveline($usearc, $f, $f2->getfullpath($win32));
					if (!empty($run)) 
					{
						if ($cfg['archivemodedebug']) echo($run); else exec($run);						
					}
					$cnt++;
					$per = ($cnt / $files) * 100;
					$per = number_format($per, 0).'%';
					echo '';
					flush();
				}
			}
		}
		
		chdir($cwd);
		if (file_exists($f)) 
		{
			for ($i=0,$c=count($this->files);$i<$c;$i++)
			{
				$f2 = new file2($this->files[$i]);
				if ($f2->ifexists()) 
				{
					$fdesc = new filedesc($f2->fname);
					if ($u_id && $fdesc->logaccess) $hid = addhistory($u_id, $f2->sid, 3);
				}				
			}
			
			?>
				
			
				
				
				
				
				
				
			'.get_lang(167).''; 
		@unlink($tf);
		kprintend();
	}
}

function kpgenerateid3v2tag($sid)
{
	global $cfg, $phpenv, $setctl;
	
	if ($cfg['enablegetid3'])
	{
		$f2 = new file2($sid, true);

		$data['id3v2']['TIT2'][0]['encodingid'] = 0;
		$data['id3v2']['TIT2'][0]['data']       = $f2->id3['title'];
		$data['id3v2']['TPE1'][0]['encodingid'] = 0;
		$data['id3v2']['TPE1'][0]['data']       = $f2->id3['artist'];
		$data['id3v2']['TALB'][0]['encodingid'] = 0;
		$data['id3v2']['TALB'][0]['data']       = $f2->id3['album'];
		$data['id3v2']['TRCK'][0]['encodingid'] = 0;
		$data['id3v2']['TRCK'][0]['data']       = $f2->id3['track'];
		$data['id3v2']['COM'][0]['encodingid'] = 0;
		$data['id3v2']['COM'][0]['data']       = $f2->id3['comment'];
		$data['id3v2']['TYER'][0]['encodingid'] = 0;
		$data['id3v2']['TYER'][0]['data']       = $f2->id3['year'];
		 
		switch (GETID3_V)
		{
			case 16:
					require_once(GETID3_INCLUDEPATH.'getid3.id3v2.php');
					return GenerateID3v2Tag($data['id3v2'], 3, 0, 0, '', false, false, false);
					break;		
			
			case 17:
					$tagformat = 'UTF-8';
					$major = 3;
					$getID3 = new getID3;
					$getID3->encoding = $tagformat;

					if (!defined('GETID3_INCLUDEPATH')) define('GETID3_INCLUDEPATH', dirname($cfg['getid3include']).'/');
					if (getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'module.tag.id3v2.php', __FILE__, false) &&
					getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'write.php', __FILE__, false) &&
					getid3_lib::IncludeDependency(GETID3_INCLUDEPATH.'write.id3v2.php', __FILE__, false))
					{			
						$tagwriter = new getid3_writetags;
						$tagwriter->tagformats = array('id3v2.3');

						$tagwriter->filename = $f2->fullpath;
						$tagwriter->overwrite_tags = false;
						$tagwriter->tag_encoding   = $tagformat;
						$tagwriter->remove_other_tags = true;

						$TagData['title'][]   = $f2->id3['title'];
						$TagData['artist'][]  = $f2->id3['artist'];
						$TagData['album'][]   = $f2->id3['album'];
						$TagData['year'][]    = $f2->id3['year'];
						$TagData['comment'][] = $f2->id3['comment'];
						$TagData['track'][]   = $f2->id3['track'];
										
						$res = fsearch($f2->relativepath, false, $f2->drive,'id, free', false, true);
						$rows = array();
						while ($row = mysql_fetch_row($res)) $rows[] = $row[0];	
						if (albumshow($rows, $url, 1))
						{
							$fp = fopen($url, 'rb');
							if ($fp)
							{
								if ($cfg['maxtagimagesize'] == 0 || filesize($url) <= $cfg['maxtagimagesize'])
								{
									$fdesc = new filedesc($url);
									$TagData['attached_picture'][0]['data'] = fread($fp, filesize($url));
									fclose($fp);
									$TagData['attached_picture'][0]['picturetypeid'] = 3;
									$TagData['attached_picture'][0]['encodingid'] = 0;
									$TagData['attached_picture'][0]['description'] = 'ART';
									$TagData['attached_picture'][0]['mime'] = $fdesc->mime;
								}
							}
						}

						$tagwriter->tag_data = $TagData;

						$id3v2_writer = new getid3_write_id3v2;
						$id3v2_writer->majorversion = $major;
						$id3v2_writer->paddedlength = 0;

						if (($id3v2_writer->tag_data = $tagwriter->FormatDataForID3v2($major)) !== false) 
						{
							$data = $id3v2_writer->GenerateID3v2Tag();
							return $data;
						}
					}
					break;		
		}
	}	
}

function httpstreamheader2($ftype=1, $sid, $keyint=0)
{
	global $phpenv, $streamtypes, $setctl, $u_cookieid, $cfg;
	$url = '';
	if (isset($streamtypes[$ftype]) && $streamtypes[$ftype][2] == 1)
	{
		$url = $setctl->get('streamurl').$phpenv['streamlocation'].'?streamsid='.$sid.'&c='.$u_cookieid;
		if (URLSECURITY) $url .= '&'.urlsecurity($keyint, $sid);
		if ($setctl->get('sendfileextension')) $url .= '&file=.'.$streamtypes[$ftype][0]; 		
	}
	return $url;
}

class asxgen
{
	function asxgen()
	{
		$this->crlf = "\r\n";
		$this->data = ''.$this->crlf.''.$this->crlf;		
	}

	function sendlink2($sid)
	{
		$f2 = new file2($sid, true);
		if ($f2->ifexists())
		{
			$fd = new filedesc($f2->fname);
			if ($fd->found && $fd->m3u)
			{
				$url = httpstreamheader2($fd->fid, $sid, $f2->fdate);
				if (!empty($url))
				{
					$this->data .= ''.$this->crlf;
					$this->data .= ''.$this->crlf;
					$this->data .= ''.$this->crlf;
					$this->data .= ''.$this->crlf;
      			}
			}
		}
	}

	function start()
	{
		$this->data .= '';
		if (db_guinfo('plinline')) $method = 'inline'; else $method = 'attachment';
		header('Content-Disposition: '.$method.'; filename=kp'.lzero(getrand(1,999999),6).'.asx');
		header('Content-Type: video/x-ms-asf');
		header('Content-Length: '.strlen($this->data));
		header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
		echo $this->data;
	}
}

class m3ugenerator
{
	function m3ugenerator()
	{
		$pltype = db_guinfo('pltype');
		switch($pltype)
		{
			case 2: $this->obj = new asxgen(); break;
			default: $this->obj = new m3ugen(); break;
		}		

	}

	function sendlink2($sid)
	{
		$this->obj->sendlink2($sid);
	}

	function start()
	{
		$this->obj->start();
	}
}


class m3ugen
{
	function m3ugen()
	{
		$this->data = '';
		$this->crlf = "\r\n";
		$this->addcrlf = false;
		
		if (db_guinfo('extm3u'))
		{
			$this->setdata('#EXTM3U');
			$this->addcrlf = true;
		}
	}

	function mkextinf2($name, $lengths)
	{
		return $this->crlf.'#EXTINF:'.$lengths.','.$name;
	}
	
	function checkcrlf()
	{
		if ($this->addcrlf) $this->setdata($this->crlf);
			$this->addcrlf = false;
	}
	
	function sendlink2($sid)
	{
		$f2 = new file2($sid, true);
		if ($f2->ifexists())
		{
			$fd = new filedesc($f2->fname);
			if ($fd->found && $fd->m3u)
			{
				if (db_guinfo('extm3u')) $this->setdata($this->mkextinf2($f2->gentitle(), $f2->getlengths()));
				$this->checkcrlf();
				$this->setdata(httpstreamheader2($fd->fid, $sid, $f2->fdate));
				$this->addcrlf = true;
			}
		}
	}
	
	function setdata($data)
	{
		$this->data .= $data;
	}

	function start()
	{
		if (db_guinfo('plinline')) $method = 'inline'; else $method = 'attachment';
		$this->checkcrlf();
		header('Content-Disposition: '.$method.'; filename=kp'.lzero(getrand(1,999999),6).'.m3u');
		header('Content-Type: audio/x-mpegurl');
		header('Content-Length: '.strlen($this->data));
		header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
		echo $this->data;
	}
}

function playresource2($sid)
{
	$f2 = new file2($sid, true);
	if ($f2->ifexists())
	{
		$fd = new filedesc($f2->fname);
		if ($fd->m3u)
		{
			$m3ug = new m3ugenerator();
			$m3ug->sendlink2($sid);
			$m3ug->start();
		} else Kplay_senduser2($sid, 1); // for video/mpeg/etc
	}
}

class kq_Measure
{
	function getmicrotime()
	{ 
		list($usec, $sec) = explode(' ', microtime());
		return ((float)$usec + (float)$sec);
    }

	function start()
	{
		$this->start = $this->getmicrotime();
		usleep(100);
	}

	function setalarm($alarm)
	{
		$this->alarm = $alarm;
	}

	function alarm()
	{
		if ( ($this->getmicrotime() - $this->start)   >= (float)$this->alarm) return true;
		return false;
	}
	
	function stop()
	{
		$this->stop =  $this->getmicrotime();
	}

	function result($decimal=2)
	{
		return number_format($this->stop-$this->start, $decimal);
	}
}

function streamfp($fp, $kbit, $prebuffer=true, $hid = 0, $fsize=0)
{
	global $streamsettings;
	@ini_set('output_buffering', 0);
	$rpos = 0;
	$bread = ($kbit * 1000) / 8;
	$kqm = new kq_Measure();
	$kqm->setalarm($streamsettings['sleep']);

	if ($streamsettings['preload'] && $prebuffer)
	{
		$prebuff = ($bread / 100) * (int)$streamsettings['preload'];
		$data = '';
		while (strlen($data) < $prebuff && !feof($fp)) $data .= fread($fp, $prebuff - strlen($data));
		echo $data;
		flush();
	}

	$breadbuf = ($bread / 100) * (int)$streamsettings['buffer'];
	$precision = (int)$streamsettings['precision'];	

	$kqm->start();
	while (!feof($fp) && !connection_aborted())
	{
		$data = '';
		while (strlen($data) < $breadbuf && !feof($fp)) $data .= fread($fp, $breadbuf-strlen($data));
		echo $data;
		$rpos += strlen($data);
		pollhid($hid, $rpos, $fsize);
		flush();
		while (!$kqm->alarm()) usleep($precision);
		$kqm->start();
	}
	pollhid($hid, $rpos, $fsize, true);
}

function getlame($bitrate=128,$file)
{
	global $cfg;
	$out = str_replace('%bitrate%', $bitrate, $cfg['lamecmd']);
	$out = str_replace('%file%', $file, $out);
	return $out;
}

function Kplay_senduser2($sid, $inline=0, $download=false, $tid = 0)
{
	global $win32, $_SERVER, $setctl, $streamsettings, $u_id, $lamebitrates, $dlrate;
	ignore_user_abort(true);
	$hid = 0;
	$id3v2tag = '';
	$f2 = new file2($sid, true);
	
	if ($f2->ifexists())
	{
		$fp = fopen($f2->fullpath, "rb");
		if ($fp)
		{
			$fdesc = new filedesc($f2->fname);
			if (!$download && $u_id && db_guinfo('lameperm') && db_guinfo('lamerate') != 0 && $setctl->get('lamesupport') && $fdesc->gid == 1) $uselame = true; else $uselame = false;
			
			$posfrom = 0;
			if (isset($_SERVER['HTTP_RANGE']) && ALLOWSEEK)
			{
				$data = explode('=',$_SERVER['HTTP_RANGE']);
        		$ppos = explode('-', trim($data[1]));
        		$posfrom = (int)trim($ppos[0]);
			}

			if ($posfrom == 0)
			{
				$lastux = getlasthistory($sid, $u_id);
				if (($lastux + 5) <= time()) 
				{
					search_updatevote($sid);
					if ($u_id && $fdesc->logaccess)  $hid = addhistory($u_id, $sid, $tid);
				} else $hid = getlasthistory($sid, $u_id, true);
			}

			if ($posfrom > 0) $hid = getlasthistory($sid, $u_id, true);

			if ($hid) updateactive($hid);
			
			if ($setctl->get('writeid3v2') && $fdesc->gid == 1 && $posfrom == 0 && !$download)
			{
				$id = fread($fp, 3);
				if ($id != 'ID3') $id3v2tag = kpgenerateid3v2tag($sid);
				fseek($fp, 0, SEEK_SET);
			}

			$clen = $f2->fsize + strlen($id3v2tag);

			if (!$inline)
			{		
				if ($download) header('Content-Disposition: attachment; filename="'.$f2->fname.'"'); 
				 else header('Content-Disposition: attachment; filename='.$f2->gentitle()); 
				if (ALLOWSEEK && !$uselame) 
				{
					header('Content-Length: '.$clen);
					header('Accept-Ranges: bytes');
				}
			} else
			{
				header('Content-Disposition: inline; filename='.$f2->fname); 
				if (!$uselame) 
				{
					header('Content-Length: '.$clen);
					header('Accept-Ranges: bytes');
				}
			}
			
			header('Content-Type: '.$fdesc->mime);
			header('Content-Range: bytes '.$posfrom.'-');
			header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
			header('Content-Transfer-Encoding: binary');
			header('Expires: '. gmdate('D, d M Y H:i ', time()+24*60*60) . ' GMT');
			header('Pragma: public');

			if ($posfrom > 0)
			{				
				header('Partial content', true, 206);
				if ($posfrom == ($f2->fsize - 129) || $posfrom == ($f2->fsize - 128)) // request id3v1
				{
					fseek($fp, -128, SEEK_END);
					echo fread($fp, 128);
					rewind($fp);
				} else fseek($fp, $posfrom);
			}

			// finally STREAM  - no more headers allowed.

			if (!empty($id3v2tag)) echo $id3v2tag;

			if ($download)
			{
				$upc = 0;
				if (db_guinfo('udlrate')) $udlrate = db_guinfo('udlrate');
					else
				if ($dlrate) $udlrate = $dlrate;
					else
				$udlrate = 0;
				
				if ($udlrate && !$win32) streamfp($fp, $udlrate, false, $hid, $f2->fsize);
					else
				while (!feof($fp) && !connection_aborted()) 
				{	
					$dt = fread($fp, 16384);
					echo $dt;
					$upc += strlen($dt);
					pollhid($hid, $upc, $f2->fsize);
				}
				pollhid($hid, $upc, $f2->fsize, true);

			} else
			{			
				if ($uselame)
				{
					$descriptorspec = array(0 => array('pipe', 'r'), 1 => array('pipe', 'w'));

					$process = proc_open(getlame($lamebitrates[db_guinfo('lamerate')], $f2->fullpath), $descriptorspec, $pipes);
					if (is_resource($process))
					{
						if ($setctl->get('streamingengine') && !$win32) streamfp($pipes[1], $lamebitrates[db_guinfo('lamerate')]);
							else while (!feof($pipes[1]) && !connection_aborted()) echo fgets($pipes[1], 1024);
						fclose($pipes[0]);
						fclose($pipes[1]);
						proc_close($process);
					}
				} else
				{
					if ($setctl->get('streamingengine') && !$win32)
					{
							if (@$streamsettings['forcedefaultrate']) 
						streamfp($fp, $streamsettings['defaultrate'], true, $hid, $f2->fsize);
							else
							if (in_array ($f2->id3['bitrate'], $streamsettings['bitrates']) && $f2->id3['ratemode'] == 1)  // cbr
						streamfp($fp, $f2->id3['bitrate'], true, $hid, $f2->fsize);
							else
						streamfp($fp, $streamsettings['defaultrate'], true, $hid, $f2->fsize);
					} else 
					{	
						$upc = 0;
						while (!feof($fp) && !connection_aborted()) 
						{
							$dt = fread($fp, 16384);
							echo $dt;
							$upc += strlen($dt);
							pollhid($hid, $upc, $f2->fsize);
						}
						pollhid($hid, $upc, $f2->fsize, true);
					}
				}
			}
			@fclose($fp);
		}
	}
	die();
}

function pollhid($hid, &$pos, $fsize, $end = false)
{
	if ($hid != 0)
	{
		if ($pos > (int)($fsize / 100) || $end)
		{
			updatehistory($hid, $pos);
			$pos = 0;
		}
	}
}

function kplay_archivedownload($file, $mime, $name)
{
	global $dlrate, $win32, $u_id;
	$fp = fopen($file, 'rb');
	ignore_user_abort(true); 
	if ($fp)
	{
		header('Content-Type: '.$mime);
		header('Content-Disposition: attachment; filename="'.$name.'"');
		header('Content-Length: '.filesize($file));
		header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
		header('Content-Transfer-Encoding: binary');
		header('Expires: '. gmdate('D, d M Y H:i ', time()+24*60*60) . ' GMT');
		header('Pragma: public');

		if (db_guinfo('udlrate')) $udlrate = db_guinfo('udlrate');
			else
		if ($dlrate) $udlrate = $dlrate;
			else
		$udlrate = 0;

		if ($udlrate && !$win32) streamfp($fp, $udlrate, false);
			else
		while (!feof($fp) && !connection_aborted()) echo fread($fp, 32768); 
		@fclose($fp);
	}
}

function print_dir($drive, $name, $pdir, $nr, $image='dir.gif',$title='', $ainf=null, $mark='', $showalbum = false, $hits = 0, $albumid=0)
{
	global $PHP_SELF;

	/*if ($showalbum)
	{
		$res = fsearch($pdir, false, $drive,'id, free');
		while ($row = mysql_fetch_row($res)) $rows[] = $row[0];
		$url = '';
		if (albumshow($rows, $url, 30, 30)) echo ''.$url.'';
	}*/
	
	if (!empty($pdir)) $pdir_64 = base64_encode($pdir); else $pdir_64='';
	$out = ' ';
	if ($showalbum)
	{
		$out .= '';
		$out .= ' ';
		$out .= '';
	}
	if ($nr != -1) $md = md5($name); else $md = '';
	$out .= '';
	$out .= '';
	if ($ainf) $out .= '  ('.get_lang(151, $ainf['length'], $ainf['index']).')';
	if ($hits > 0) $out .= '  ('.$hits.' '.get_lang(243).')';
	$out .= '';
	return $out;
}


class filedesc
{
	function filedesc($fname)
	{
		global $streamtypes;
		$this->fid = file_type($fname);
		if ($this->fid != -1)
		{
			$this->found = true;
			$this->mime = $streamtypes[$this->fid][1];
			$this->m3u = $streamtypes[$this->fid][2];
			$this->gid = $streamtypes[$this->fid][3];
			$this->view = $streamtypes[$this->fid][4];
			$this->logaccess = $streamtypes[$this->fid][5];
		} else
		{
			$this->found = false;
			$this->mime = 0;
			$this->gid = 0;
			$this->m3u = 0;
			$this->view = 0;
			$this->logaccess = 0;
		}		
	}
}

function file_type($name, $sindex=0)
{
	global $streamtypes;
	$l = strlen($name);
	for ($i=0,$c=count($streamtypes);$i<$c;$i++)
	{
		if ($l >= strlen($streamtypes[$i][0]) )
		{
			$match = substr($name, strlen($name)-strlen($streamtypes[$i][0]));
			if (preg_match('/'.$streamtypes[$i][0].'/i', $match)) 
			{
				if ($sindex) 
				{ 
					if ($streamtypes[$i][4]) return $i; 
				} else return $i;
			}
		}
	}
	return -1;
}

function file_extension($name)
{
	if (strrpos($name, '.') != false)
		return strtolower(substr($name, strrpos($name,'.')));
	return null;
}

function ratetypeid($strtype)
{
	switch($strtype)
	{
		case 'cbr': return 1;
		case 'abr': return 2;
		case 'vbr': return 3;
		default: return 0;
	}
}

function get_aheader()
{
	return array('album' => '', 'artist' => '', 'lengths' => 0, 'index' => 0, 'length' => '00:00');
}

function gen_aheader($album, $artist, $lengths, $index)
{
	$ret = get_aheader();
	$ret['album'] = $album;
	$ret['artist'] = $artist;
	$ret['lengths'] = $lengths;
	$ret['index'] = $index;
	if ($lengths > 0) $ret['length'] = sprintf('%02d:%02d',floor($lengths/60), $lengths % 60);
	return $ret;
}

function gen_file_header($title = '', $artist = '', $album = '', $bitrate = 0, $lengths = 0, $genre = 255, $ratemode = 1, $track = 0, $year = 0, $comment = '')
{
	$ret = array('title' => $title, 'artist' => $artist, 'album' => $album, 'length' => '00:00', 'bitrate' => $bitrate, 'lengths' => $lengths, 'genre' => $genre, 'tag' => false, 'ratemode' => $ratemode, 'track' => $track, 'year' => $year, 'comment' => $comment);
	if ($lengths > 0) $ret['length'] = sprintf('%02d:%02d', floor($lengths/60), $lengths % 60);
	return $ret;
}

function gen_file_info_sid($row)
{
	if ($row) return gen_file_header($row['title'], $row['artist'], $row['album'], $row['bitrate'], $row['lengths'], $row['genre'], $row['ratemode'], $row['track'], $row['year'], $row['comment']);
	return false;
}

function get_searchrow($sid)
{
	return @mysql_fetch_array(db_execquery('SELECT * FROM '.TBL_SEARCH.' WHERE id = '.$sid, true));
}

function unstig($field)
{
	if (is_array($field))
		foreach($field as $val) return trim($val);
	else return $field;
}

function tunstig($field, $arrayi)
{
	if (isset($arrayi[$field]))
	{
		$dt = trim(unstig($arrayi[$field]));
		if (!empty($dt)) return true;
	}
	return false;
}

function array_fetch($arrayi, &$ret)
{
	if (tunstig('title', $arrayi)) $ret['title'] = unstig($arrayi['title']);
	if (tunstig('artist', $arrayi)) $ret['artist'] = unstig($arrayi['artist']);
	if (tunstig('album', $arrayi)) $ret['album'] = unstig($arrayi['album']);
	if (tunstig('track', $arrayi)) $ret['track'] = unstig($arrayi['track']);
	if (tunstig('tracknumber', $arrayi)) $ret['track'] = unstig($arrayi['tracknumber']);
	if (tunstig('year', $arrayi)) $ret['year'] = unstig($arrayi['year']);
	if (tunstig('genreid', $arrayi)) $ret['genre'] = unstig($arrayi['genreid']);
	if (tunstig('comment', $arrayi)) $ret['comment'] = unstig($arrayi['comment']);
}

function getid3order()
{
	global $cfg;
	$order = array();
	
	$pri1 = $cfg['id3tagspri']['id3v1'];
	$pri2 = $cfg['id3tagspri']['id3v2'];
	
	if ($pri1 && $pri1 < $pri2) $order[] = 1;
	if ($pri2) $order[] = 2;
	if ($pri1 && $pri2 < $pri1) $order[] = 1;
	
	return $order;
}

$arrgenrename = array();

function getgenreidfromName($name)
{
	global $arrgenrename;
	if (count($arrgenrename) == 0)
	{
		$genrelist = gengenres();
		foreach ($genrelist as $id => $gname) $arrgenrename[strtolower($gname)] = $id;		
	}
	if (isset($arrgenrename[strtolower($name)])) return $arrgenrename[strtolower($name)];
	return 255;
}

function get_file_info($name)
{
	global $streamtypes, $cfg;
	$ret = gen_file_header();
	if ($cfg['enablegetid3'])
	{
		if (GETID3_V == 16)
		{
			$finfo = GetAllFileInfo($name, file_extension($name));

			if (isset($finfo['tags']) && is_array($finfo['tags']))
			{
				$use = '';
				foreach ($finfo['tags'] as $tagroot)
				{
					$use = $tagroot;
					if ($use == 'id3v2') break; // prefer id3v2.
				}
			}

			$ret['bitrate'] = isset($finfo['bitrate']) ? round($finfo['bitrate']) / 1000 : 0;
			$ret['ratemode'] = isset($finfo['audio']['bitrate_mode']) ? ratetypeid($finfo['audio']['bitrate_mode']) : 0;
			$ret['length'] = isset($finfo['playtime_string']) ? $finfo['playtime_string'] : '00:00';
			$ret['lengths'] = isset($finfo['playtime_seconds']) ? (int)round($finfo['playtime_seconds']) : 0;

			if (!empty($use) && @is_array($finfo[$use]))
			{			
				if ($use == 'id3v2' && isset($finfo['id3v1'])) 
				{					
					$order = getid3order();											
					foreach($order as $idtag)
					{
						switch($idtag)
						{
							case 1: array_fetch($finfo['id3v1'], $ret); break;
							case 2: array_fetch($finfo[$use]['comments'], $ret); break;
						}
					}					
				} else
				{
					if ($use == 'id3v2') array_fetch($finfo[$use]['comments'], $ret);
						else array_fetch($finfo[$use], $ret);
				}
			} else if (@is_array($finfo['comments'])) array_fetch($finfo['comments'], $ret);
		} else
		if (GETID3_V == 17)
		{		
			$getID3 = new getID3();
			$finfo = $getID3->analyze($name);
	
			$ret['length'] = isset($finfo['playtime_string']) ? $finfo['playtime_string'] : '00:00';
			$ret['lengths'] = isset($finfo['playtime_seconds']) ? round($finfo['playtime_seconds']) : 0;
			isset($finfo['audio']['bitrate']) ? $ret['bitrate'] = round($finfo['audio']['bitrate']) / 1000 : 0;
			$ret['ratemode'] = isset($finfo['audio']['bitrate_mode']) ? ratetypeid($finfo['audio']['bitrate_mode']) : 0;

			if (isset($finfo['tags']) && is_array($finfo['tags']))
			{
				$first = '';
				foreach ($finfo['tags'] as $tagroot => $vals)
				{
					$use = $tagroot;
					if ($use == 'id3v2') break; // prefer id3v2.
				}			
				
				if (!empty($use))
				{
					if ($use == 'id3v2' && isset($finfo['tags']['id3v1'])) 
					{
						$order = getid3order();											
						foreach($order as $idtag)
						{
							switch($idtag)
							{
								case 1: array_fetch($finfo['tags']['id3v1'], $ret); break;
								case 2: array_fetch($finfo['tags']['id3v2'], $ret); break;
							}
						}			
					} else array_fetch($finfo['tags'][$use], $ret);					
					if (isset($finfo['tags'][$use]['genre'])) $ret['genre'] = getgenreidfromName($finfo['tags'][$use]['genre'][0]);					
				}
			}		
		}
	} else
	{
		$ftype = file_type($name);
	
		if ($ftype != -1)
		{
			$getidf = @$streamtypes[$ftype][3] or $getidf = 0;
			switch($getidf)
			{
				case 1: 
					if (class_exists('id3'))
					{
						$id3 = new id3($name);
						$ret['title'] = trim($id3->name);
						$ret['artist'] = trim($id3->artists);
						$ret['album'] = trim($id3->album);
						$ret['length'] = $id3->length;
						$ret['track'] = (int)$id3->track;
						$ret['year'] = (int)$id3->year;
						$ret['comment'] = trim($id3->comment);
						if ($id3->bitrate) $ret['bitrate'] = $id3->bitrate;
						if ($id3->lengths > 0) $ret['lengths'] = $id3->lengths;
						$ret['genre'] = $id3->genreno;
					}
					break;

				case 2:
					if (class_exists('ogg'))
					{
						$ogg = new ogg($name);
						foreach ($ogg->fields as $name => $val) 
						{
						
							$ch = strtolower($name);
							
							if (isset($ret[$ch]))
							{
								$ind = '';
								foreach ($val AS $contents) $ind .= $contents; 
								
								switch($ch)
								{
									case 'genre':
											if (is_numeric($ind)) $ret[$ch] = $ind;
											break;
									case 'lengths':
											if (is_numeric($ind)) $ret[$ch] = $ind;
											break;
									default:
											$ret[$ch] = $ind;
											break;
								}							
							}
						}					
					}
					break;

				default: break;
			}
		}
	}
	
	if (!is_numeric($ret['year'])) $ret['year'] = 0;
	if (!is_numeric($ret['track'])) $ret['track'] = 0;
	if (!is_numeric($ret['lengths'])) $ret['lengths'] = 0;
	if (!is_numeric($ret['bitrate'])) $ret['bitrate'] = 0;
	
	return $ret;
}

function ismarked($info)
{
	global $mark;
	if (count($mark) == 0) return false;
	$hits = 0;
	for ($i=0,$c=count($mark);$i<$c;$i++) 
	if (strpos(strtoupper($info), $mark[$i]) !== false) $hits++; else return false;
	if ($hits == $c) return true;
}

function file_parse($f2, $link, $class, $str = FILETEMPLATE)
{
	$str2 = array(0 => '', 1 => '', 2 => '');
	$slot = 0;
	$fullfilled = true;
	$conditional = false;
	$or = false;
	for ($i=0,$l=strlen($str);$i<$l;$i++)
	{
		switch ($str[$i])
		{
			case '[': 
					$conditional = true; 
					$slot = 1;
					break;
			case ']': 
				if ($fullfilled) $str2[0] .= $str2[1]; else if ($or) $str2[0] .= $str2[$slot];
				$str2[1] = '';
				$str2[2] = '';
				$fullfilled = true;
				$conditional = false;  
				$slot = 0;
				$or = false;
				break;
			case '|':			
				if ($conditional) 
				{
					$or = true;
					$slot = 2;
				}
				break;
			case '%':
				if ($i + 1 >= $l) 
				{
					$str2[$slot] .= $str[$i]; 
					break; 
				}
				$add = '';
				$match = true;
				switch ($str[$i+1])
				{
					case 'f': $add = checkchs($f2->fname); break;
					case 'a': $add = checkchs($f2->id3['artist']); break;
					case 'l': $add = checkchs($f2->id3['album']); break;
					case 't': $add = checkchs($f2->id3['title']); break;
					case 'b': $add = $f2->id3['bitrate']; break;
					case 'r': if ($f2->id3['track'] != 0) $add = $f2->id3['track']; break;
					case 'R': if ($f2->id3['track'] != 0) $add = lzero($f2->id3['track']); break;
					case 'S': if ($f2->fsize > 1048576) $add = get_lang(272, number_format($f2->fsize / 1048576,2)); else
									if ($f2->fsize > 8192) $add = get_lang(273, number_format($f2->fsize / 1024,1)); else
										$add = get_lang(274, $f2->fsize);
								break;
					case 's': $add = $f2->id3['length']; break;
					case 'h': $add = $f2->hits; break;
					case 'y': if ($f2->id3['year'] != 0) $add = $f2->id3['year']; break;
					case 'i': $add = $link; break;
					case 'c': $add = $class; break;
					case 'g': if ($f2->id3['genre'] != 255) $add = gengenres($f2->id3['genre']); break;
					default: $match = false; break;
				}
				if ($match) 
				{
					$i++;
					$str2[$slot] .= $add;
				} else $str2[$slot] .= '%';
				if ($conditional && empty($add)) $fullfilled = false;
				break;
			default: $str2[$slot] .= $str[$i]; break;
		}
	}	
	return $str2[0];
}

function urlsecurity($fdate, $sid)
{
	return 'stag='.base64_encode(pack('ll', time(), $fdate+$sid));
}

function chksecurity($sid=0)
{	
	global $cfg;
	if (URLSECURITY)
	{
		$ok = false;
		if (isset($_GET['stag']))
		{
			$datat = @unpack('l2', @base64_decode($_GET['stag']));
			if (isset($datat[1]) && is_numeric($datat[1]) && isset($datat[2]) && is_numeric($datat[2]))
			{
				if ($sid)
				{
					$f2 = new file2($sid);
					if ($f2->fexists)
					{
						if ($datat[2] == ($f2->fdate + $sid))
						{
							if (($datat[1] + $cfg['urlsecurityvalidtime']) >= time() || $cfg['urlsecurityvalidtime'] == 0) $ok = true;
						}
					}
				}
			}
		}
		return $ok;
	} else return true;
}

function print_file($sid, $showlink=0, $includeabsolute=0, $f2=false, $smarksid = -1)
{
	global $PHP_SELF, $u_cookieid, $setctl, $cfg, $marksid;

	if (!$f2) $f2 = new file2($sid, true);
	$inf = $f2->getid3();
	$title = $f2->gentitle(array('title', 'album'));	

	echo ' ';

	if ($cfg['id3editor'] && db_guinfo('u_access') == 0 && function_exists('file_id3editor'))
	{
		$id3link = '&id3sid='.$sid;
		echo 'id3 ';
	}

	if (ALLOWDOWNLOAD && db_guinfo('u_allowdownload'))
	{
		if (URLSECURITY) $urlextra = '&'.urlsecurity($f2->fdate, $sid); else $urlextra = '';
		echo ''.
		' ';
	}

	if (MAILMP3 && db_guinfo('allowemail') && class_exists('mailmp3'))
	echo ''.
	' ';

	if ($showlink) echo ''.' ';
	
	if (ismarked($f2->fname.$title) || $f2->sid == $marksid) $useclass = 'filemarked'; else $useclass = 'file';
	
	echo file_parse($f2, $f2->weblink(), $useclass);
	echo '';
}

function listfiles($where, &$in, $drive)
{
	if ($d = @opendir($where)) 
	{
		while ($file = readdir($d)) if (is_file($where.$file) && file_type($file) != -1) $in[] = array($file, $drive, filesize($where.$file),filemtime($where.$file)); 
		closedir($d);
	}
}

function disksync($dir, $drive, $root = false, $stop = false)
{
	global $base_dir;
	$flist = array();
	$dblist = array();
	$found = 0;
	
	if (!$root) 
		$dbres = db_execquery('SELECT free,fsize,mtime FROM '.TBL_SEARCH.' WHERE f_stat = 0 AND dirname = "'.mysql_escape_string($dir).'" AND drive = '.$drive.' ORDER BY free ASC', true);
			else
		$dbres = db_execquery('SELECT free,fsize,mtime FROM '.TBL_SEARCH.' WHERE f_stat = 0 AND dirname = "" ORDER BY free ASC', true);

	while ($row = mysql_fetch_row($dbres)) $dblist[] = array($row[0], $row[1], $row[2]);
	
	if (!$root) listfiles($base_dir[$drive].$dir, $flist, $drive); else
	for ($i=0;$i 0)
	{
		if ($checkdir[0] == '/') return 1;
		$i = strpos ( $checkdir, $srcstr1);
		if ($i !== false) return 1;
	}
	return 0;
}

$lastwhere = false;

function readresources($where)
{
	global $dir_list, $lastwhere, $cfg;
	$c = 0;
	
	if ($lastwhere == $where) return; 
	$lastwhere = $where;

	$dir_list = array();	

	if ($dir = @opendir($where)) 
	{
		while ($file = readdir($dir)) if (!isset($cfg['dirignorelist'][$file])) if (is_dir($where.$file)) $dir_list[$c++] = $file;
		closedir($dir);
	}
	usort($dir_list, 'strcasecmp');
}

function firsttime()
{
	global $PHP_SELF;
	?>
	
		
			

			

				
Welcome to kPlaylist!
				
				To get your site quickly up:
				
				

Click Settings on the admin menu, choose 'File handling' and enter the path to your music directory or directories in the 'base directory' field. You can also click the find button to automatically detect music directories.


				
				If you have problems, click here for the kPlaylist installation manual.
				


				
			
			
		
	
	
	
		
			

			

				
Base directory changed
				The base dir setting was changed. Please click the 'Update' button on the admin menu to perform
				an update.
				


				This message will only appear once per change in the base directory setting.
				


				
			
			
		
	
	view) 
		{
			$fcnt++;
			print_file($row[0],0,1);
		}
	}	
}

function fsearch($dir, $root = false, $drive = 0, $r='id', $recurse = false, $fast=false)
{
	$order = 'dirname,free';
	if (ORDERBYTRACK) $order = 'track,dirname,free';

	if ($recurse)
		$dir_oper = 'dirname like "'.mysql_escape_string($dir).'%"';
	else
		$dir_oper = 'dirname = "'.mysql_escape_string($dir).'"';
	if (!$root)
		$sql = 'SELECT '.$r.' FROM '.TBL_SEARCH.' WHERE f_stat = 0 AND '.$dir_oper.' AND drive = '.$drive.' ORDER BY '.$order.' ASC';
	else
		$sql = 'SELECT '.$r.' FROM '.TBL_SEARCH.' WHERE f_stat = 0 AND dirname = "" ORDER BY '.$order.' ASC';
	return db_execquery($sql, $fast);
}

function fmatch($file, $pattern)
{
	$match = '';
	$fpos = 0;
	$any = false;
	for ($i=0,$c=strlen($pattern);$i<=$c;$i++)
	{
		if ($i == $c || $pattern[$i] == '*')
		{
			if (!empty($match))
			{
				$found = true;
				$p = strpos($file, $match, $fpos);
				if ($p !== false)
				{
					if (($i - strlen($match)) != $p && !$any) $found = false;
					$fpos = $p + strlen($match);
				} else $found = false;
				$any = false;
				if (!$found) return false;					
			} 		
			if ($i < $c) $any = true;
			$match = '';
		} else $match .= $pattern[$i];
	}
	if (!$any && strlen($file) > $fpos) return false;
	return true;
}

function albumshow($rows, &$url, $patht=0, $width=0, $height=0)
{
	global $setctl;
	$names = array();
	for ($i=0,$c=count($rows);$i<$c;$i++)
	{
		$f2 = new file2($rows[$i], false);
		$names[] = array($f2->fname, $f2->weblink(), $f2->fullpath);
	}

	if (!$width) $wm = $setctl->get('albumwidth'); else $wm = $width;
	if (!$height) $hm = $setctl->get('albumheight');  else $hm = $height;

	$albumfiles = explode(',', strtoupper($setctl->get('albumfiles')));
	
	for ($i=0,$c=count($albumfiles);$i<$c;$i++)
	{		
		$amatch = trim($albumfiles[$i]);
		if (empty($amatch)) continue;
		for ($i2=0,$c2=count($names);$i2<$c2;$i2++)
		{
			if (fmatch(strtoupper($names[$i2][0]), $amatch))
			{
				if ($patht > 0) 
				{
					if ($patht == 1) $url = $names[$i2][2]; else $url = $names[$i2][1];
					return true;
				} else
				{
					if ($setctl->get('albumresize')) 
					{ 
						$nw = $nh = 0;
						imgcoords(0,0,$names[$i2][2], $nw, $nh);
						$url = ''; 
					} else $url = '';				
				}
				return true;
			}
		}
	}
	return false;
}

function imgcoords($width=0, $height=0, $srcfp, &$nw, &$nh)
{
	global $setctl;
	if (!$width) $wm = $setctl->get('albumwidth'); else $wm = $width;
	if (!$height) $hm = $setctl->get('albumheight');  else $hm = $height;

	if ($imagesize = @getimagesize($srcfp))
	{
		$w = $imagesize[0]; 
		$h = $imagesize[1]; 
		
		$nw = min ($wm, $w); 
		$nh = min ($hm, $h); 
		$p = ($wm > $hm) ? $w / $h : $h / $w; 
		if ($p > 1) 
			$nh = round($h * $nw / $w); 
		else 
			$nw = round($w * $nh / $h); 
		if ($nw > $wm || $nh > $hm) 
		{ 
			$nw = min ($wm, $nw); 
			$nh = min ($hm, $nh); 
			$p = ($wm > $hm) ? $h / $w : $w / $h; 
			if ($p > 1) 
			$nh = round($h * $nw / $w); 
			elseif ($p < 1) 
			$nw = round($w * $nh / $h); 
		}
	} else
	{
		$nw = $wm;
		$nh = $hm;
	}
}


function retornaEndImgCapa($artist, $album)
{
	global $setctl;
	$url = str_replace('%artist', urlencode($artist), $setctl->get('albumurl'));
	$strEndereco = str_replace('%album', urlencode($album), $url);
	$handle = fopen($strEndereco, 'r');
	if (!empty($handle))
	{
		$contents = '';
		while (!feof($handle)) {
		  $contents .= fread($handle, 8192);
		}
		fclose($handle);
				
		if (is_numeric(strpos($contents,'coverart')))
		{
			$contents = substr($contents,strpos($contents,'coverart'),strlen($contents));
			$contents = substr($contents,strpos($contents,'src="')+5,strlen($contents));			
			$contents = substr($contents, 0, strpos($contents,'"'));			
		} else $contents = '';
		
		if (!is_numeric(strpos($contents,'.jpg')) & !is_numeric(strpos($contents,'.gif'))) return false;
			else 
		return $contents;
	}
	return false;
}

function tracksort($res, $posid, $postrack)
{
	global $cfg;
	$trackorder = false;
	$tracks = array();
	while ($row = mysql_fetch_row($res)) 
	{
		if ($row[$postrack] != 0) $trackorder = true;
		$rows[] = $row;
		$tracks[] = (int)$row[$postrack];
	}
	if ($trackorder && $cfg['ordertrack']) array_multisort($tracks, $rows, SORT_NUMERIC);
	return $rows;
}

function read_dir($pdir, $drive=0, &$fcnt, &$dcnt)
{
	global $base_dir, $dir_list, $setctl, $cfg;	
	
	readresources($base_dir[$drive].$pdir);
	
	if (DISKSYNC) disksync($pdir, $drive);

	$res = fsearch($pdir, false, $drive,'id, free, track', false, true);

	$dcnt = count($dir_list);

	$rows = $viewrows = array();
	while ($row = mysql_fetch_row($res)) 
	{
		$rows[] = $row[0];
		$fdesc = new filedesc($row[1]);		
		if ($fdesc->view) $viewrows[] = $row[0];
	}

	$fcnt = count($viewrows);

	if (ALBUMCOVER && $dcnt <= $cfg['isalbumdircount'] && $fcnt > 0) 
	{
		$url = '';
		$result = albumshow($rows, $url, 0);
		
		if (!$result && FETCHALBUM)
		{
			$artist = '';
			$album = '';
			for ($i=0,$c=count($rows);$i<$c;$i++)
			{
				$sql = 'SELECT artist, album FROM '.TBL_SEARCH.' WHERE id = '.$rows[$i];
				$res = db_execquery($sql);
				if ($res !== false)
				{
					$id = mysql_fetch_row($res);
					$artist = $id[0];
					$album = $id[1];
					if (!empty($artist) && !empty($album)) break;
				}
			}
			if (!empty($artist) && !empty($album)) 
			{				
				$img = retornaEndImgCapa($artist, $album);
				if (!empty($img))
				{
					?>
					
					get('albumresize'))
					{
						$nw = $nh = 0;
						imgcoords(0,0, $img, $nw, $nh);
						echo ''; 
					} else echo '';
					?>
					
					
					'.$url.'';
	}

	if ($fcnt == 0 && $dcnt == 0) echo ''.get_lang(156).''; 
	else
	{
		for ($i=0;$i<$dcnt;$i++) echo print_dir($drive,$dir_list[$i], $pdir, $i);
		for ($i=0,$c=count($viewrows);$i<$c;$i++) print_file($viewrows[$i],0,1);
	}
}

function dir_divide($path, $drive)
{
	global $PHP_SELF;
	$out = null;
	$dir = null;
	$dirs = explode('/', $path);
	for ($i=0,$c=count($dirs);$i<$c;$i++)
	{
		if (!empty($dirs[$i]))
		{
			$dir .= $dirs[$i].'/';
			if ($i == 0) $show = '/'; else $show = null; 
			$out .= ''.$show.$dirs[$i].'/'.'';
		}
	}
	return $out;	
}

function showdir($pdir, $text="", $drive)
{
	global $PHP_SELF;

	$show= null;
	$root = ' ';
	
	$dirname = null;
	$dirs = explode('/', $pdir);
	$selection = count($dirs) - 1;
	if (empty($dirs[count($dirs)-1])) $selection--;
	for ($i=0;$i<$selection;$i++) $dirname .= $dirs[$i].'/';
	
	if (empty($text))
	{
		$show = $root . '   ' . dir_divide($pdir,$drive);
	} else $show = $root.$text;
	echo ''.$show.' 
'; 	
}


function get_dir($dirlist, $cnt, $n2)
{
	if (isset($dirlist[$cnt]) && md5($dirlist[$cnt]) == $n2) return $dirlist[$cnt];
	for ($i=0,$c=count($dirlist);$i<$c;$i++)
		if (md5($dirlist[$i]) == $n2) return $dirlist[$i];
	if (isset($dirlist[$cnt])) return $dirlist[$cnt];
	return '';
}

function figurepdir($pdir='', $count=-1, $drive=0, $n2='')
{
	global $runinit, $base_dir, $dir_list;
	if (!empty($pdir)) $pdir = stripslashes(base64_decode($pdir));

	if (checkstructure($pdir) == 0)
	{	
		if (isset($base_dir[$drive]))
		{
			readresources($base_dir[$drive].$pdir);

			if (is_numeric($count) && $count != -1)
			{
				$pdir .= get_dir($dir_list, $count, $n2);
				if (!empty($pdir)) 
				{ 
					if ($pdir[strlen($pdir)-1] != '/') $pdir .= '/'; 
				} else $pdir = '';
			}
			$runinit['pdir'] = $pdir;
			$runinit['pdir64'] = base64_encode($pdir);
			$runinit['drive'] = $drive;
			return true;
		} else return false;
	} else return false;
}

function kplaylist_filelist($where, $n=-1, $drive=0, $n2='')
{
	global $runinit, $mark, $marksid, $base_dir, $setctl;

	if (figurepdir($where, $n, $drive, $n2))
	{
		if (isset($_GET['mark']) && !empty($_GET['mark'])) $mark = explode(' ', strtoupper(trim($_GET['mark']))); else $mark = array();
		if (isset($_GET['marksid'])) $marksid = $_GET['marksid'];
		kprintheader('kPlaylist', 1);
		$kpd = new kpdesign();
		$kpd->top();
		if ((!isset($n) || $n == -1) && empty($where)) $root = true; else $root = false;

		if (!$root) showdir($runinit['pdir'],'', $runinit['drive']);		
		$fcnt = 0;
		$dcnt = 0;
		echo '';

		$list = true;

		if (db_guinfo('u_access') == 0)
		{
			if (count($base_dir) == 1 && $base_dir[0] == '/path/to/my/music/archive/')
			{	
				$list = false;
				firsttime(); 
			} 

			if ($setctl->get('basedir_changed') && $base_dir[0] != '/path/to/my/music/archive/') 
			{
				$setctl->set('basedir_changed', 0);
				if ($setctl->get('base_dir') != $setctl->get('oldbase_dir'))
				{
					$setctl->set('oldbase_dir', $setctl->get('base_dir'));
					$list = false;
					basedirchanged();
				}
			}
		}
		
		if ($list)
		{
			if ($root) listroot($fcnt, $dcnt); else read_dir($runinit['pdir'], $runinit['drive'], $fcnt, $dcnt);
		}		
		
		if ($root) endmp3table(0, $dcnt, $fcnt); else endmp3table(1, $dcnt, $fcnt);
		$kpd->bottom();
		kprintend(); 
	} 
}


class file2
{	
	function file2($sid = -1, $id3 = false, $dbrow=false)
	{
		$this->fexists = false;
		$this->fullpath = '';
		$this->fsize = 0;
		$this->fname = '';
		$this->drive = 0;
		$this->origrow = false;
		$this->investigated = false;
		$this->id3 = false;
		$this->relativepath = '';
		$this->dir64 = '';
		$this->fdate = 0;
		
		$this->fsize = 0;
		$this->dbrow = $dbrow;
		$this->sid = $sid;
		if ($sid != -1)
		{
			$this->investigate();
			if ($id3) $this->getid3();
		}
	}
	
	function investigate()
	{
		global $base_dir;
		if ($this->dbrow !== false) $this->origrow = $this->dbrow; 
			else $this->origrow = get_searchrow($this->sid);
		
		if ($this->origrow !== false)
		{
			$this->fexists = false;
			$this->drive = $this->origrow['drive'];
			$this->investigated = true;
			$this->relativepath = $this->origrow['dirname']; 
			$this->fsize = $this->origrow['fsize'];
			$this->fdate = $this->origrow['date'];

			if (isset($base_dir[$this->drive]))
			{
				$this->fname = basename($this->origrow['free']);				
				$this->fullpath = $base_dir[$this->drive].$this->relativepath.$this->fname;			
				if (OPTIMISTICFILE) $this->fexists = true; 
					else 
				if (@file_exists($this->fullpath)) $this->fexists = true;
			}
		} else return false;
	}

	function gentitle($fields = array('track', 'artist', 'title', 'album'), $maxlength = 256)
	{
		$title = '';
		foreach ($fields as $name) if (isset($this->origrow[$name]) && !empty($this->origrow[$name])) checkcharadd($title, ' - ', $this->origrow[$name]);
		if (empty($title)) $title = $this->fname;
		$title = trim($title);
		if (strlen($title) > $maxlength) return substr($title, 0, $maxlength - 3).' ..';
		return $title;
	}

	function ifexists()
	{
		return $this->fexists;
	}

	function getfullpath($win32)
	{
		if ($win32) return str_replace('/', '\\', $this->fullpath); else return $this->fullpath;
	}

	function getdrivedir()
	{
		global $base_dir;
		return $base_dir[$this->drive];
	}
	
	function getdir64()
	{
		if (empty($this->dir64)) $this->dir64 = base64_encode($this->relativepath);
		return $this->dir64;
	}

	function weblink($sid=0, $fdate=0)
	{
		global $PHP_SELF, $u_cookieid, $cfg;
		if (!$sid) $sid = $this->sid;
		if (!$fdate) $fdate = $this->fdate;
		if (URLSECURITY) $urlextra = '&'.urlsecurity($fdate, $sid); else $urlextra = '';
		return $PHP_SELF.'?sid='.$sid.'&c='.$u_cookieid.$urlextra;
	}

	// don't get to hung up about the name. It's not really a id3 tag, it's anything (ogg, id3v1, id3v2, etc.)
	function getid3()
	{
		if ($this->investigated)
		{
			if ($this->id3 == false) 
				$this->id3 = gen_file_info_sid($this->origrow);
		}
		return $this->id3;
	}

	function getlengths()
	{
		$this->getid3();
		return $this->id3['lengths'];
	}	
}


function KCheckActions()
{ 
	global $_POST, $_GET, $phpenv, $u_cookieid, $u_id, $PHP_SELF, $setctl, $validated_user, $cfg;

	if (isset($_GET['c'])) $stat = db_verify_stream($_GET['c'], $phpenv['remote']); else $stat = 0;
	
	if ($stat == 0)
	{
		if ($setctl->get('unauthorizedstreams'))
		{
			$validated_user['extm3u'] = $setctl->get('unauthorizedstreamsextm3u');
			$validated_user['plinline'] = 1;
			$validated_user['pltype'] = 1;
			if (isset($_GET['streamsid'])) 
			{
				if (chksecurity($_GET['streamsid'])) Kplay_senduser2($_GET['streamsid'], 0); 
			} else
			if (isset($_GET['sid'])) 
			{
				if (chksecurity($_GET['sid'])) playresource2($_GET['sid']); 
			} else
			if (isset($_GET['streamplaylist']))
			{
				if (isset($_GET['extm3u'])) $validated_user['extm3u'] = 1;
				$kp = new kp_playlist($_GET['streamplaylist']);
				$kp->play();
			}
		}
	} else
	{
		if (isset($_GET['c'])) $u_cookieid = $_GET['c'];

		if (isset($_GET['downloadfile'])) 
		{
			if (chksecurity($_GET['downloadfile'])) Kplay_senduser2($_GET['downloadfile'], 0, true, 1); 
		} else
		if (isset($_GET['sid'])) 
		{
			if (chksecurity($_GET['sid'])) playresource2($_GET['sid']); 
		} else	
		if (isset($_GET['streamsid'])) 
		{
			if (chksecurity($_GET['streamsid'])) Kplay_senduser2($_GET['streamsid'], 0);
		}
	}
	die();
}	

if (isset($_GET['downloadfile']) || isset($_GET['sid']) || isset($_GET['streamsid']) || isset($_GET['streamplaylist'])) KCheckActions();

if (isset($_GET['update']) && isset($_GET['user'])) search_updateautomatic($_GET['user'],$phpenv['remote'],$_GET['update']);

if (isset($_POST['signup']) || isset($_GET['signup']) && USERSIGNUP) KSignup();

if (isset($_POST['user']) && isset($_POST['password']) && !empty($_POST['user']) && !empty($_POST['password']))
{
	if (webauthenticate())
	{
		$uri = $PHP_SELF.'?checkcookie=true';
		if (isset($_POST['uri']) && !empty($_POST['uri'])) 
		{
			$ourl = urldecode($_POST['uri']);
			$qpos = strrpos($ourl, '?');
			if ($qpos !== false && $cfg['accepturi']) 
			{
				$addchkc = strpos($ourl, 'checkcookie=true');
				if ($addchkc === false) $addurl = '&checkcookie=true'; else $addurl = '';
				$uri = $PHP_SELF.substr($ourl, $qpos).$addurl;
			}
		}
		refreshurl($uri);
		die();
	} else
	{
		if ($setctl->get('report_attempts')) syslog_write('User could not be validated (user: "'.$_POST['user'].'")');
		klogon();
	}
} 

if (isset($_COOKIE[$cfg['cookie']]) || $cfg['disablelogin'])
{	
	if (db_verify_stream(@$_COOKIE[$cfg['cookie']], $phpenv['remote']))
	{
		if (REQUIRE_HTTPS && !$phpenv['https']) klogon();

		if (isset($_COOKIE[$cfg['cookie']])) $u_cookieid = $_COOKIE[$cfg['cookie']]; else $u_cookieid = null;
		
		$deflanguage = db_guinfo('lang');

		if (isset($_POST['sel_playlist'])) user_saveoption('defplaylist', vernum($_POST['sel_playlist']));

		if (isset($_POST['sel_shplaylist'])) 
		{
			user_saveoption('defshplaylist', vernum($_POST['sel_shplaylist']));
			$_POST['sel_playlist'] = $_POST['sel_shplaylist'];
		}

		if (isset($_GET['action']) || isset($_POST['action']))
		{
			if (isset($_GET['action'])) $action = $_GET['action']; else $action = $_POST['action'];		
			$match = true;
			
			switch ($action)
			{
				case 'bulletin':
						if (BULLETIN && class_exists('kbulletin'))
						{
							kprintheader(get_lang(268), 1);
							$kpd = new kpdesign();
							$kpd->addform = false;
							$kpd->top();
							$kb = new kbulletin();
							$kb->showall();
							$kpd->bottom();
							kprintend();							
						}
						break;
				
				case 'newbulletin':
						$kb = new kbulletin();
						$kb->editbulletin(0);
						break;
					
				case 'delbulletin':
						if (isset($_GET['bid']) && is_numeric($_GET['bid']))
						{
							kprintheader(get_lang(268), 1);
							$kpd = new kpdesign();
							$kpd->addform = false;
							$kpd->top();
							$kb = new kbulletin();
							$kb->delbulletin($_GET['bid'], $u_id);
							$kb->showall();
							$kpd->bottom();
							kprintend();
							
						}
						break;

				case 'editbulletin':
						if (isset($_GET['bid'])) 
						{
							$kb = new kbulletin();
							$kb->editbulletin($_GET['bid']);
						}
						break;
				
				case 'savebulletin':
						$kb = new kbulletin();
						if (isset($_POST['publish']) && db_guinfo('u_access') == 0) $publish = 1; else $publish = 0;
						if (isset($_POST['mesg'])) $mesg = $_POST['mesg']; else $mesg = '';
						if (isset($_POST['bid'])) $bid = $_POST['bid']; else $bid = 0;
						$bid = $kb->savebulletin($bid, $publish, $mesg);
						$kb = new kbulletin();
						$kb->editbulletin($bid, true);
						break;

				case 'sendmail':
						if (class_exists('mailmp3'))
						{
							$mail3 = new mailmp3();
							if (isset($_GET['id'])) $mail3->setsid($_GET['id']);
							$mail3->decide();
						}
						break;

				case 'fupload':
						if (class_exists('fupload'))
						{
							$fu = new fupload();
							$fu->decide();
						}
						break;

				case 'playlist_new':
						playlist_new();
						break;

				case 'playlist_newsave':
						if (!empty($_POST['name']))
						{
							if (isset($_POST['shared'])) $shared = 1; else $shared = 0;
							$added = playlist_createnew($_POST['name'],$shared);
							kprintheader(get_lang(61), 1);
							echo '';
							if ($added) echo get_lang(35); else echo get_lang(137);
							echo '

';
							echo ''.get_lang(27).'';
							if ($added) echo ' - '.get_lang(36).'';
							kprintend();
						} else playlist_new();
						break;

				case 'editoptions':
						show_useroptions();
						break;				
				
				case 'randomizer':
						$rz = new kprandomizer();
						if (isset($_POST['mode'])) $rz->setmode($_POST['mode']);
						if (isset($_POST['limit'])) $rz->setlimit($_POST['limit']);
						if (isset($_POST['genres'])) $rz->setgenre($_POST['genres']);
						if (isset($_POST['playlist'])) $rz->setplaylist($_POST['playlist']);
						if (isset($_POST['order'])) $rz->setorder($_POST['order']);
						if (isset($_POST['usersfilter'])) $rz->setusers($_POST['usersfilter']);
						if (isset($_POST['minsec'])) $rz->setminsec($_POST['minsec']);
						if (isset($_POST['maxsec'])) $rz->setmaxsec($_POST['maxsec']);
						if (isset($_POST['rowmode'])) $rz->setrowmode($_POST['rowmode']);
						if (isset($_POST['execute'])) $rz->execute(); else $rz->view();
						break;

				case 'showrandomizer':
						if (class_exists('kprandomizer'))
						{
							$rz = new kprandomizer();
							$rz->view();
						}
						break;
						
				case 'updateoptions':
						if (db_guinfo('u_access') == 0) search_updatelist_options();
						break;

				case 'settingsview':
						if (db_guinfo('u_access') == 0)
						{
							isset($_GET['page']) ? $page = $_GET['page'] : $page = 0;
							isset($_GET['reload']) ? $reload = $_GET['reload'] : $reload = 0;
							settings_edit($reload, $page);
						}
						break;
				
				case 'savesettings':
						if (db_guinfo('u_access') == 0)
						{
							isset($_POST['page']) ? $page = $_POST['page'] : $page = 0;
							settings_save($_POST, $page);
							settings_edit(1, $page);
						}
						break;
				
				case 'performupdate':
						if (db_guinfo('u_access') == 0) 
						{
							if (isset($_POST['followsymlinks'])) $setctl->set('followsymlinks', 1); else $setctl->set('followsymlinks', 0);
							$setctl->publish('followsymlinks');
							search_updatelist($_POST);
						}						
						break;

				case 'id3edit':
						if (db_guinfo('u_access') == 0 && $cfg['id3editor'] && function_exists('file_id3editor'))
						{
							$f2 = new file2($_GET['id3sid']);
							if ($f2->ifexists()) file_id3editor($f2->fullpath);
						}
						break;

				case 'id3save':
						if (db_guinfo('u_access') == 0 && $cfg['id3editor'] && function_exists('file_id3editor_save'))
						{
							file_id3editor_save(stripcslashes(base64_decode($_POST['file'])), $_POST);
							file_id3editor(stripcslashes(base64_decode($_POST['file'])));
						} 
						break;
				
				case 'showusers':
						if (db_guinfo('u_access') == 0) show_users();			
						break;

				case 'userdel':
						if (db_guinfo('u_access') == 0)
						{
								$id = $_GET['id'];
								if (is_numeric($id)) db_execquery('DELETE FROM '.TBL_USERS.' WHERE u_id = '.$id);
								show_users();
						}
						break;
				
				case 'usersave': 
						if (db_guinfo('u_access') == 0)
						{
							if (isset($_POST['submit']))
							{
								$id = $_POST['u_id'];
								if (isset($_POST['passchange']) && $id != -1) $changepw = 1; else $changepw = 0;
								isset($_POST['booted']) ? $booted = 1 : $booted = 0;
								isset($_POST['lameperm']) ? $lameperm = 1 : $lameperm = 0;
								isset($_POST['download']) ? $download = 1 : $download = 0;
								isset($_POST['allowemail']) ? $allowemail = 1 : $allowemail = 0;

								$name = mysql_escape_string($_POST['name']);
								$email = mysql_escape_string($_POST['email']);
								$login = mysql_escape_string($_POST['login']);
								$pass = mysql_escape_string($_POST['password']);
								$comm = mysql_escape_string($_POST['comment']);
								$access = mysql_escape_string($_POST['access']);
								if (is_numeric($_POST['udlrate'])) $udlrate = $_POST['udlrate']; else $udlrate = 0;

								if (empty($pass) && $changepw) show_userform($id);
								else
								if (empty($name) || empty($login)) show_userform($id,'',$name,$pass,$comm,$login,$access,$download, $udlrate);
								else
								{
									$text = get_lang(262);
									$pass = md5($pass);
									if ($id == -1) $query = 'INSERT into '.TBL_USERS.' set u_name = "'.$name.'", u_login = "'.$login.'", u_pass = "'.$pass.'",  u_comment = "'.$comm.'", u_access = '.$access. ', u_allowdownload = "'.$download.'", lang = "'.$setctl->get('default_language').'", udlrate = '.$udlrate.', allowemail = '.$allowemail.', created = '.time(); 
									else
									{
										if ($changepw) 
										{
											$text = get_lang(157);
											db_execquery('UPDATE '.TBL_USERS.' SET u_pass = "'.$pass.'" WHERE u_id = '.$id);
										}
										$query = "UPDATE ".TBL_USERS." set u_name = \"$name\", u_login = \"$login\", u_booted = $booted, u_comment = \"$comm\", u_access = $access, u_allowdownload = \"$download\", udlrate = $udlrate, lameperm = $lameperm, allowemail = $allowemail, email = \"$email\" where u_id = $id";
									}
									db_execquery($query);
									if ($id != -1) show_userform($id, $text); else show_users();
								}								
							} else show_users();
						}
						break;
				
				case 'useraction':
						if (db_guinfo('u_access') == 0)
						{				
							if (isset($_POST['newuser'])) show_userform();
								else
							if (isset($_POST['refresh'])) show_users();
						}
						break;

				case 'useredit':
						if (db_guinfo('u_access') == 0)
							show_userform(vernum($_GET['id']));
						break;
				
				case 'userlogout':
						if (db_guinfo('u_access') == 0)
						{
							$id = $_GET['id'];
							if (is_numeric($id)) if (!$cfg['demomode']) db_execquery('UPDATE '.TBL_USERS.' SET u_sessionkey = 0, u_status = 0 WHERE u_id = '.$id);
							show_users();
						}
						break;

				case 'userhistory':
						if (db_guinfo('u_access') == 0) show_userhistory(vernum($_GET['id']));
						break;
					
				case 'useractivate':
						if (db_guinfo('u_access') == 0 && is_numeric($_GET['id'])) db_execquery('UPDATE '.TBL_USERS.' SET u_status = 0 WHERE u_id = '.$_GET['id']);
						show_users();
						break;

				case 'historyview':
						if (db_guinfo('u_access') == 0) show_userhistory(vernum($_POST['id']), vernum($_POST['length']));
						break;

				case 'saveuseroptions':
						$state = save_useroptions($_POST);
						switch ($state)
						{
							case 2: show_useroptions(get_lang(157),true); break;
							case 3: show_useroptions(get_lang(165),true); break;
							default: show_useroptions(null,true); break;
						}
						break;

				case 'deletefiletype':
						if (db_guinfo('u_access') == 0)
						{
							db_execquery('DELETE from '.TBL_FILETYPES.' WHERE id = '.vernum($_GET['del']));
							settings_edit(1, 3);
						}
						break;

				case 'findmusic':
						if (db_guinfo('u_access') == 0) findmusic();
						break;

				case 'editfiletype':
						if (db_guinfo('u_access') == 0) edit_filetype(vernum($_GET['id']));
						break;		

				case 'storefiletype':
						if (db_guinfo('u_access') == 0)
						{
							if (isset($_POST['extension'])) $extension = $_POST['extension']; else $extension = '';
							if (isset($_POST['m3u'])) $m3u = 1; else $m3u = 0;
							if (isset($_POST['search'])) $search = 1; else $search = 0;
							if (isset($_POST['logaccess'])) $logaccess = 1; else $logaccess = 0;
							$id = store_filetype(vernum($_POST['id']), $m3u, $search, $logaccess, mysql_escape_string($_POST['mime']), $extension);
							edit_filetype(vernum($id), true);
						}
						break;

				case 'search':
						if (isset($_POST['onlyid3'])) user_saveoption('defaultid3', 1); else user_saveoption('defaultid3', 0);
						if (isset($_POST['hitsas'])) user_saveoption('hitsas', verchar($_POST['hitsas']));
						if (isset($_POST['searchwh'])) user_saveoption('defaultsearch', vernum($_POST['searchwh'])); 
						
						$kps = new kpsearch();
						if (isset($_POST['searchfor']) && !empty($_POST['searchfor']) && is_array($kps->getwords($kps->what)))
						{							
							$kps->gensearchsql();
							kprintheader(get_lang(5), 1);
							$kpd = new kpdesign();
							$kpd->top();
							
							$kps->viewsearch();							
							$nv = new navi(2, $kps->rows, true);
							$nv->writenavi();
							$kps->endsearch();
							$kpd->bottom();
							kprintend();
						} else $match = false;
						break;

				case 'playlist':
						if (isset($_POST['editplaylist']) || isset($_POST['viewplaylist']))  
							playlist_editor($_POST['sel_playlist'], $_POST['previous']);
						else
						if (isset($_POST['playplaylist']))
						{
							if (isset($_POST['sel_playlist']) && is_numeric($_POST['sel_playlist']))
							{
								$kp = new kp_playlist($_POST['sel_playlist']);
								$kp->play();
							}		
						}
						break;

				case 'playlisteditor':
						if (isset($_POST['saveseq'])) 
						{
							playlist_savesequence($_POST['seq'],$_POST['sel_playlist']);
							playlist_editor($_POST['sel_playlist'], $_POST['previous'], $_POST['sort']);
						} else							
						if (isset($_POST['saveplaylist']))
						{
							if (is_numeric($_POST['sel_playlist']) && !empty($_POST['playlistname']) )
							{
								if (isset($_POST['shared'])) $shared = 1; else $shared = 0;
								if (isset($_POST['shuffle'])) $shuffle = 1; else $shuffle = 0;
								$id = $_POST['sel_playlist'];
								if (is_numeric($id))
								{
									$name = mysql_escape_string(stripslashes(checkchs($_POST['playlistname'])));						
									db_execquery('UPDATE '.TBL_PLAYLIST.' SET name = "'.$name.'", public = '.$shared.', status = '.$shuffle.' WHERE listid = '.$id);
								}
							}
							playlist_editor($_POST['sel_playlist'], $_POST['previous'], $_POST['sort']);				
						} else
						if (isset($_POST['sortplaylist']))
						{
							$id = $_POST['sel_playlist'];
							switch ($_POST['sort'])
							{					
								case 0: pl_sortalphabetic($id); break;
								case 1: pl_sortrandom($id); break;
								case 2: pl_sortoriginal($id); break;
								case 3: pl_removeduplicates($id); break;
							}				
							playlist_editor($_POST['sel_playlist'], $_POST['previous'], $_POST['sort']);
						} else
						if (isset($_POST['playplaylist']))
						{
							if (isset($_POST['sel_playlist']) && is_numeric($_POST['sel_playlist']))
							{
								$kp = new kp_playlist($_POST['sel_playlist']);
								$kp->play();
							}			
						} else
						if (isset($_POST['deleteplaylist']))
						{
							if (is_numeric($_POST['sel_playlist']))
							{
								$id = $_POST['sel_playlist'];
								playlist_delete($id);
								kplaylist_filelist($_POST['previous'],-1,$_POST['drive']);
							}
						} else 
						if (isset($_POST['playselected']))
						{							
							$m3ug = new m3ugenerator();
							for ($i=0,$c=count($_POST['selected']);$i<$c;$i++)
							{
								$row = mysql_fetch_array(db_execquery('SELECT * FROM '.TBL_PLAYLIST_LIST.' WHERE id = '.$_POST['selected'][$i]));
								$m3ug->sendlink2($row['sid']);					
							}
							$m3ug->start();
						} else
						if (isset($_POST['delselected']))
						{
							if (count($_POST['selected']) > 0)
							{
								for ($i=0;$iget('default_language');
							klogon(); 
						} 
						break;
				
				case 'delsingleplaylist':
						$plid = $_GET['plid'];
						if (!empty($_GET['del']))
						{
							$id = $_GET['del'];
							if (is_numeric($id) && is_numeric($plid))
							{
								db_execquery('DELETE from '.TBL_PLAYLIST_LIST.' WHERE id = '.$id);					
								playlist_rewriteseq($plid);
							}
						}
						playlist_editor($plid, $_GET['p']);
						break;
				
				case 'hotselect':
						if (isset($_GET['artist'])) hotselect($_GET['artist']);	
						break;				
				
				case 'playalbum':
						
						if (figurepdir($_GET['p'], -1, $runinit['drive']))
						{							
							$res = fsearch($runinit['pdir'], false, $runinit['drive'], 'id,album');						
						
							$m3ug = new m3ugenerator();
							if (!empty($_GET['ft'])) $ft = stripcslashes($_GET['ft']); else $ft = '';
							if (isset($_GET['ftid']) && is_numeric($_GET['ftid'])) 
							{
								$f2 = new file2($_GET['ftid'], true);
								$ft = $f2->id3['album'];
							}

							while ($row = mysql_fetch_row($res))
							{
								if (!empty($ft) && $ft != $row[1]) continue;
								$m3ug->sendlink2($row[0]);
							}
							$m3ug->start();						
						}
						break;

				case 'downloadarchive':
						if (isset($_POST['mime']) && isset($_POST['file']))
						{
							if (!isset($_POST['filename']) || empty($_POST['filename'])) $filename = 'kpdl'.date('hi'); 
								else $filename = $_POST['filename'];
						
							$file = $cfg['archivetemp'] . $_POST['file'];
							if (file_exists($file) && checkstructure($_POST['file'], false) == 0)
							{
								kplay_archivedownload($file, $_POST['mime'], $filename);
								@unlink($file);								
							} else 
							{
								kprintheader(get_lang(260),0);
								echo '
';
								echo ''.get_lang(261).'

';
								echo ''; 
								echo '
';
								kprintend();
							}
						}
				
				case 'dlall':
						if (isset($_GET['p']) && isset($_GET['d']) && ALLOWDOWNLOAD && db_guinfo('u_allowdownload') && $cfg['archivemode'])
						{
							$kpa = new kparchiver();							
							if (figurepdir($_GET['p'], -1, $_GET['d']))
							{
								$res = fsearch($runinit['pdir'], false, $_GET['d']);
								while ($row = mysql_fetch_row($res)) $kpa->setfile($row[0]);								
								$kpa->execute();
							}
						}
						break;

				case 'dlplaylist':
						if (isset($_GET['pid']) && ALLOWDOWNLOAD && db_guinfo('u_allowdownload') && $cfg['archivemode'])
						{
							$kpa = new kparchiver();
							$kp = new kp_playlist($_GET['pid']);
							$res = $kp->getres();							
							while ($row = mysql_fetch_row($res)) $kpa->setfile($row[0]);								
							$kpa->execute();
						}
						break;

				case 'dlselected':
						if (isset($_POST['filestoarc']) && ALLOWDOWNLOAD && db_guinfo('u_allowdownload') && $cfg['archivemode'])
						{
							$kpa = new kparchiver();
							$fl = explode(';', $_POST['filestoarc']);
							for ($i=0,$c=count($fl);$i<$c;$i++) if (is_numeric($fl[$i])) $kpa->setfile($fl[$i]);
							$kpa->execute();
						}
						break;

				case 'dlselectedjs':						
						kprintheader(get_lang(260),0);
						if (isset($_POST['filestoarc'])) echo $_POST['filestoarc'];
						?>
						

						
						
						
						
						header, 1);
						$kpd = new kpdesign();
						$kpd->top();
						$nv->searchnavi(2, $page - 1);							
						$kpd->bottom();
						kprintend();						
					}
					break;

				case 'listedres':
						if (isset($_POST['searchnavigate_right'])) 
						{
							$nv = new navi(2);
							kprintheader($nv->header, 1);
							$kpd = new kpdesign();
							$kpd->top();							
							$nv->searchnavi(1);
							$kpd->bottom();
							kprintend();
						} else
						if (isset($_POST['searchnavigate_left'])) 
						{
							$nv = new navi(2);
							kprintheader($nv->header, 1);
							$kpd = new kpdesign();
							$kpd->top();
							$nv->searchnavi(0);
							$kpd->bottom();
							kprintend();
						} else
						if (isset($_POST['hotoptions'])) 
						{
							if (isset($_POST['hotperiod']) && is_numeric($_POST['hotperiod'])) 
							{
								$filter = $_POST['hotperiod']; 
								user_saveoption('hotmode', $filter);
							} else $filter = 0;
							genliststart(4);
						} else
						if (isset($_POST['editplaylist']) || isset($_POST['viewplaylist']))  playlist_editor($_POST['sel_playlist'], $_POST['previous']);
						else
						if (isset($_POST['addplaylist']))
						{
							kprintheader(get_lang(61), 1);
							if (empty($_POST['selected'])) 
								echo ''.get_lang(32).'  ';
							else
							{
								db_addtoplaylist($_POST['sel_playlist'], $_POST['selected']);
								echo ''.get_lang(33).'  ';
							}
							echo ' '.get_lang(34).' ';
							echo '';				
						} else
						if (isset($_POST['playplaylist']))
						{
							if (isset($_POST['sel_playlist']) && is_numeric($_POST['sel_playlist']))
							{
								$kp = new kp_playlist($_POST['sel_playlist']);
								if (!$kp->play()) errormessage(get_lang(302), true);
							}		
						} else
						if (isset($_POST['psongsselected']) || isset($_POST['psongsall']) || isset($_POST['pdirsall']))
						{
							$m3ug = new m3ugenerator();
							if (isset($_POST['psongsselected']))
							{
								if (isset($_POST['selected']))
									for ($i=0,$c=count($_POST['selected']);$i<$c;$i++) $m3ug->sendlink2($_POST['selected'][$i]);
								$m3ug->start();
							} else 
							if (isset($_POST['psongsall']))
							{
								if (figurepdir($_POST['previous'], -1, $runinit['drive']))
								{
									$res = fsearch($runinit['pdir'], false, $runinit['drive']);
									while ($row = mysql_fetch_row($res)) $m3ug->sendlink2($row[0]);
									$m3ug->start();
								}
							} else 
							if (isset($_POST['pdirsall']))
							{
								if (figurepdir($_POST['previous'], -1, $runinit['drive']))
								{
									$res = fsearch($runinit['pdir'], false, $runinit['drive'], 'id', true);
									while ($row = mysql_fetch_row($res)) $m3ug->sendlink2($row[0]);
									$m3ug->start();
								}
							}
						}					
						break;
				
				default:
					$match = false;
					break;	
			
			}
			if ($match) die();
		}
		isset($_GET['p']) ? $p = $_GET['p'] : $p = null;
		isset($_GET['n']) ? $n = $_GET['n'] : $n = null;
		isset($_GET['n2']) ? $n2 = $_GET['n2'] : $n2 = null;
		isset($_GET['d']) ? $d = $_GET['d'] : $d = 0;
		kplaylist_filelist($p, $n, $d, $n2);

	} else
	{
		klogon();
	}
} else if (isset($_GET['checkcookie']))
{
	klogon(get_lang(237));
} else klogon();

?>