网址缩短　短网址程序

这是一个网上的代码，无需数据库，将要缩短的网址存在于一个同目录里的txt文件里。
演示：http://www.ucmbaa.org/u/
目的一是缩短了网址，二是不让搜索引擎识别这个地址。

2. <?php
4. /*
5. location of file to store URLS
6. */
7. $file = ‘urls.txt’;
9. /*
10. use mod_rewrite: 0 – no or 1 – yes
11. */
12. $use_rewrite = 1;
14. /*
15. language/style/output variables
16. */
18. $l_url = ‘URL’;
19. $l_nourl = ‘没有输入URL地址‘;
20. $l_yoururl = ‘你的短网址:‘;
21. $l_invalidurl = ‘无效的URL.‘;
22. $l_createurl = ‘生成短网址’;
24. //////////////////// NO NEED TO EDIT BELOW ////////////////////
26. if(!is_writable($file) || !is_readable($file))
27. {
28. die(‘Cannot write or read from file. Please CHMOD the url file (urls.txt) by default to 777 and make sure it is uploaded.’);
29. }
31. $action = trim($_GET[‘id’]);
32. $action = (empty($action) || $action == ”) ? ‘create’ : ‘redirect’;
34. $valid = “^(https?|ftp)\:\/\/([a-z0-9+!*(),;?&=\$_.-]+(\:[a-z0-9+!*(),;?&=\$_.-]+)?@)?[a-z0-9+\$_-]+(\.[a-z0-9+\$_-]+)*(\:[0-9]{2,5})?(\/([a-z0-9+\$_-]\.?)+)*\/?(\?[a-z+&\$_.-][a-z0-9;:@/&%=+\$_.-]*)?(#[a-z_.-][a-z0-9+\$_.-]*)?\$”;
36. $output = ”;
38. if($action == ‘create’)
39. {
40. if(isset($_POST[‘create’]))
41. {
42. $url = trim($_POST[‘url’]);
44. if($url == ”)
45. {
46. $output = $l_nourl;
47. }
48. else
49. {
50. if(eregi($valid, $url))
51. {
52. $fp = fopen($file, ‘a’);
53. fwrite($fp, “{$url}\r\n”);
54. fclose($fp);
56. $id = count(file($file));
57. $dir = dirname($_SERVER[‘PHP_SELF’]);
58. $filename = explode(‘/’, $_SERVER[‘PHP_SELF’]);
59. $filename = $filename[(count($filename) – 1)];
61. $shorturl = ($use_rewrite == 1) ? “http://{$_SERVER[‘HTTP_HOST’]}{$dir}{$id}” : “http://{$_SERVER[‘HTTP_HOST’]}{$dir}{$filename}?id={$id}”;
63. $output = “{$l_yoururl} {$shorturl}”;
64. }
65. else
66. {
67. $output = $l_invalidurl;
68. }
69. }
70. }
71. }
73. if($action == ‘redirect’)
74. {
75. $urls = file($file);
76. $id = trim($_GET[‘id’]) – 1;
77. if(isset($urls[$id]))
78. {
79. header(“Location: {$urls[$id]}”);
80. exit;
81. }
82. else
83. {
84. die(‘Script error’);
85. }
86. }
88. //////////////////// FEEL FREE TO EDIT BELOW ////////////////////
89. ?>

92. 短网址服务可以帮助你把一个长网址缩短，方便你在社交网络和微博上分享链接。

94. <form action="” method=”post”>
97. 请输入URL地址:
101. <input type="submit" class="button" name="create" value="” />
109. <?php
110. ob_end_flush();
111. ?>

复制代码