docs
[mirrors/Programs.git] / php / skripty / http_server.php
1 #!usr/bin/php
2 <?php
3 //Harvie's HTTPd 0.7
4 /*
5 Allows you to binary safe download any file from remote pc
6 http://server:port/file
7 http://server:port//etc/passwd
8 http://server:port/C:\dir\file
9 http://server:port/C:/dir/file
10 Since version 0.6 there is filelisting
11 http://server:port/dir
12 http://server:port//etc
13 http://server:port/C:/dir
14 http://server:port/C:/dir/
15 You can also play multimedia like streams (using XMMS, Winamp, etc...)
16 But this can serve only one file a time
17 (if you are streaming or downloading, you can download/browse anything other,
18 but you can use download manager to download file by file...)
19 You can change port or interface by passing arguments
20 Usage: (httpd.php [port] [interface_IP])
21 This is very nice utility to use in your zombie.
22 */
23
24 //////////////////////////////////////////////////////////////////////////////////
25 $interface = "127.0.0.1";
26 //$interface = "192.168.2.130";
27 $port = 80;
28
29 //////////////////////////////////////////////////////////////////////////////////
30 $okheader = //Header 200 FILE
31 "HTTP/1.0 200 OK\n".
32 "Server: Harvie's HTTPd\n".
33 "Connection: close\n\n";
34
35 $dirheader = //Header 301 DIR
36 "HTTP/1.0 301 Moved Permanently\n".
37 "Server: Harvie's HTTPd\n".
38 "Location: %DIR%\n".
39 "Connection: close\n\n";
40
41 $badheader = //Header 404
42 "HTTP/1.0 404 File not found!\n".
43 "Server: Harvie's HTTPd\n".
44 "Connection: close\n\n";
45
46 $err404 = "ERR 404 - NOT FOUND!"; //Error 404
47
48 //////////////////////////////////////////////////////////////////////////////////
49 if(isset($argc)) {
50 if($argc > 1) $port = trim($argv[1]);
51 if($argc > 2) $interface = trim($argv[2]);
52 }
53
54 ///FUNCTIONS//////////////////////////////////////////////////////////////////////
55 function send_dir_listing($fp, $directory) {
56 $num = "0";
57 //Header
58 @fwrite($fp, "<html>\n<head><title>Index of $directory</title></head>\n<body><tt>\n");
59 @fwrite($fp, "<b>Available volumes:</b><br />\n");
60
61 //Special folders
62 @fwrite($fp, "[<a href=\"/\">/</a>]\n"); //Server root
63 @fwrite($fp, "[<a href=\"//\">//</a>]\n"); //Unix root (if running unix)
64
65 //Available volumes
66 $dsks = "cdefghijklmnopqrstuvwxyz"; //Show this volumes (if available)
67 for($i=0;$i<strlen($dsks);$i++) {
68 if(is_dir($dsks[$i].":")) {
69 $vol = $dsks[$i];
70 @fwrite($fp, "[<a href=\"/$vol:/\">$vol:</a>]\n");
71 }
72 //echo($dsks[$i].":");
73 }
74 @fwrite($fp, "<br />\n\n");
75
76 //Directory listing
77 @fwrite($fp, "<b>Directory listing of $directory :</b><br /><br />\n\n");
78 @fwrite($fp, "[DIR] <a href=\"./../\">Parent Directory (../)</a><br />\n");
79 $files=opendir ($directory);
80 while (false!==($file = readdir($files)))
81 {
82 if ($file != "." && $file != "..")
83 {
84 $num++;
85 if(is_dir("$directory/$file")) {
86 fwrite($fp, "$num - [DIR] <a href=\"./$file\">$file</a><br />\n");
87 } else {
88 fwrite($fp, "$num - <a href=\"./$file\">$file</a><br />\n");
89 }
90 }
91 }
92
93 //Footer
94 fwrite($fp, "<br />\n<b>Total: $num</b>\n</tt></body>\n</html>");
95 }
96
97 ///CODE///////////////////////////////////////////////////////////////////////////
98 echo("\n\tStarting Harvie's HTTPd at:\n\ttcp://$interface:$port\n\n");
99 //system("title Harvie's HTTPd at tcp://$interface:$port"); //Microsoft Windows only
100 set_time_limit(0);
101 $sss = stream_socket_server("tcp://$interface:$port");
102
103 while(1) {
104 @$sfp = stream_socket_accept($sss);
105 if(!$sfp) continue;
106
107 $loop = 1;
108 while($sfp && !@feof($sfp) && $loop) {
109 $line = fgets($sfp);
110 //echo($line);
111 if(eregi("(GET|POST)", $line)) {
112 $line = trim($line);
113 //echo($line);
114 $line = explode(" ", $line);
115
116 $line[1] = trim(urldecode($line[1]));
117
118
119 if($line[1] == "/") {
120 $line[1] = "./";
121 } else {
122 $line[1] = substr($line[1], 1);
123 }
124
125
126 if(is_file($line[1])) { //200 OK FILE
127 fwrite($sfp, $okheader);
128 echo("200 ".$line[1]);
129 $fp = fopen($line[1], "rb");
130 while( fwrite($sfp, fgets($fp)) );
131 @fclose($sfp);
132 echo(" SENT!\n");
133 }
134
135 elseif(is_dir($line[1])) { //200 OK DIR
136 if(substr($line[1], strlen($line[1])-1) != "/") { //301 MOV DIR
137 $header = ("/".$line[1]."/");
138 echo("301 ".$line[1]." -> $header\n");
139 $header = str_replace("%DIR%", $header, $dirheader);
140 //$header = str_replace("./", "./", $dirheader);
141 //echo($header);
142 fwrite($sfp, $header);
143 @fclose($sfp);
144 break;
145 }
146 echo("200 [DIR] ".$line[1]."\n");
147 send_dir_listing($sfp, $line[1]);
148 }
149
150 else { //404 NOT FOUND
151 echo("404 ".$line[1]."\n");
152 fwrite($sfp, $badheader);
153 fwrite($sfp, $err404);
154 @fclose($sfp);
155 }
156
157 $loop = 0;
158 }
159 }
160 @fclose($sfp);
161 }
162
163 ?>
This page took 0.516877 seconds and 4 git commands to generate.