Imported Upstream version 0.1~rc2

[roundcube.git] / bin / modcss.php

diff --git a/bin/modcss.php b/bin/modcss.php
new file mode 100644 (file)
index 0000000..e482389
--- /dev/null
+++ b/bin/modcss.php
@@ -0,0 +1,67 @@
+<?php
+
+/*
+ +-----------------------------------------------------------------------+
+ | program/bin/modcss.php                                                |
+ |                                                                       |
+ | This file is part of the RoundCube Webmail client                     |
+ | Copyright (C) 2007, RoundCube Dev. - Switzerland                      |
+ | Licensed under the GNU GPL                                            |
+ |                                                                       |
+ | PURPOSE:                                                              |
+ |   Modify CSS source from a URL                                        |
+ |                                                                       |
+ +-----------------------------------------------------------------------+
+ | Author: Thomas Bruederli <roundcube@gmail.com>                        |
+ +-----------------------------------------------------------------------+
+
+ $Id:  $
+
+*/
+
+$INSTALL_PATH = realpath("./../") . "/";
+ini_set('include_path', $INSTALL_PATH.PATH_SEPARATOR.$INSTALL_PATH.'program'.PATH_SEPARATOR.ini_get('include_path'));
+
+require 'include/main.inc';
+
+$source = "";
+if ($url = preg_replace('/[^a-z0-9.-_\?\$&=%]/i', '', $_GET['u']))
+{
+       $a_uri = parse_url($url);
+       $port = $a_uri['port'] ? $a_uri['port'] : 80;
+       $host = $a_uri['host'];
+       $path = $a_uri['path'] . ($a_uri['query'] ? '?'.$a_uri['query'] : '');
+
+
+       if ($fp = fsockopen($host, $port, $errno, $errstr, 30))
+       {
+               $out = "GET $path HTTP/1.0\r\n";
+               $out .= "Host: $host\r\n";
+               $out .= "Connection: Close\r\n\r\n";
+               fwrite($fp, $out);
+
+               $header = true;
+               while (!feof($fp))
+               {
+                       $line = trim(fgets($fp, 4048));
+                       
+                       if ($header && preg_match('/^HTTP\/1\..\s+(\d+)/', $line, $regs) && intval($regs[1]) != 200)
+                               break;
+                       else if (empty($line) && $header)
+                               $header = false;
+                       else if (!$header)
+                               $source .= "$line\n";
+               }
+               fclose($fp);
+        }
+}
+
+if (!empty($source))
+{
+       header("Content-Type: text/css");
+       echo rcmail_mod_css_styles($source, preg_replace('/[^a-z0-9]/i', '', $_GET['c']), $url);
+}
+else
+       header("HTTP/1.0 404 Not Found");
+
+?>