<? /* file.php File processing function library Copyright (C) 2000 Contributors of the QuakeForge Project Please see the file "AUTHORS" for a list of contributors This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to: Free Software Foundation, Inc. 59 Temple Place - Suite 330 Boston, MA 02111-1307, USA. */ /* fileTranslateUrl Display a file with email addresses and URLs translated to links. */ function fileTranslateUrl( $filename ) { $file = fopen( $filename, "r"); while ($line = fgets( $file, 2048 )) { if ( preg_match( "/\</", $line )) { $words = preg_split( "/\</", $line ); $words[1] = preg_replace( "/>/", "", $words[1]); echo '<A href="mailto:' . $words[1] . '">' . $words[0] . '</A><BR>'; } else { $line = preg_replace( "/http:\/\/(.*)/", "<A href=\"http://\\1\">http://\\1</A><BR>", $line ); echo $line; } } fclose( $file ); } ?>