html/cgi-bin/credits.cgi

   1 #!/usr/bin/perl
   2 ###############################################################################
   3 #                                                                             #
   4 # IPFire.org - A linux based firewall                                         #
   5 # Copyright (C) 2011  IPFire Team  <info@ipfire.org>                          #
   6 #                                                                             #
   7 # This program is free software: you can redistribute it and/or modify        #
   8 # it under the terms of the GNU General Public License as published by        #
   9 # the Free Software Foundation, either version 3 of the License, or           #
  10 # (at your option) any later version.                                         #
  11 #                                                                             #
  12 # This program is distributed in the hope that it will be useful,             #
  13 # but WITHOUT ANY WARRANTY; without even the implied warranty of              #
  14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the               #
  15 # GNU General Public License for more details.                                #
  16 #                                                                             #
  17 # You should have received a copy of the GNU General Public License           #
  18 # along with this program.  If not, see <http://www.gnu.org/licenses/>.       #
  19 #                                                                             #
  20 ###############################################################################
  21
  22 use strict;
  23
  24 # enable only the following on debugging purpose
  25 #use warnings;
  26 #use CGI::Carp 'fatalsToBrowser';
  27
  28 require '/var/ipfire/general-functions.pl';
  29 require "${General::swroot}/lang.pl";
  30 require "${General::swroot}/header.pl";
  31
  32 &Header::showhttpheaders();
  33
  34 &Header::openpage($Lang::tr{'credits'}, 1, '');
  35
  36 &Header::openbigbox('100%', 'center');
  37
  38 &Header::openbox('100%', 'left', $Lang::tr{'donation'});
  39
  40 print <<END
  41 <p>$Lang::tr{'donation-text'}</p>
  42
  43 <div align="center">
  44         <a href="http://www.ipfire.org/donate">$Lang::tr{'donation'}</a>
  45 </div>
  46 <br>
  47 END
  48 ;
  49 &Header::closebox();
  50
  51 &Header::openbox('100%', 'left', $Lang::tr{'credits'});
  52
  53 print <<END
  54 <br /><center><b><a href='http://www.ipfire.org/' target="_blank">http://www.ipfire.org/</a></b></center>
  55 <br />
  56 <p>
  57         <b>IPFire is based on IPCop and Smoothwall. Many thanks to its developers.</b><br />
  58         <b>We want to say thank you to all of the developers who ever contributed anything to IPFire.</b>
  59 </p>
  60
  61 <p><b>Development:</b><br />
  62
  63 Arne Fitzenreiter
  64 (<a href='mailto:arne.fitzenreiter\@ipfire.org'>arne.fitzenreiter\@ipfire.org</a>)  - Maintainer IPFire 2.x <br />
  65 Michael Tremer
  66 (<a href='mailto:michael.tremer\@ipfire.org'>michael.tremer\@ipfire.org</a>) - Project Leader <br />
  67 Christian Schmidt
  68 (<a href='mailto:christian.schmidt\@ipfire.org'>christian.schmidt\@ipfire.org</a>) - Vice Project Leader <br />
  69 Stefan Schantl
  70 (<a href='mailto:stefan.schantl\@ipfire.org'>stefan.schantl\@ipfire.org</a>)<br />
  71 Heiner Schmeling
  72 (<a href='mailto:heiner.schmeling\@ipfire.org'>heiner.schmeling\@ipfire.org</a>)<br />
  73 Ronald Wiesinger
  74 (<a href='mailto:ronald.wiesinger\@ipfire.org'>ronald.wiesinger\@ipfire.org</a>)<br />
  75 Silvio Rechenbach
  76 (<a href='mailto:silvio.rechenbach\@ipfire.org'>silvio.rechenbach\@ipfire.org</a>)<br />
  77 Dirk Wagner
  78 (<a href='mailto:dirk.wagner\@ipfire.org'>dirk.wagner\@ipfire.org</a>)<br />
  79 Erik Kapfer
  80 (<a href='mailto:erik.kapfer\@ipfire.org'>erik.kapfer\@ipfire.org</a>)<br />
  81 Alfred Haas
  82 (<a href='mailto:alfred.haas\@ipfire.org'>alfred.haas\@ipfire.org</a>)<br />
  83
  84 <p><b>Inactive:</b><br />
  85
  86 Peter Pfeiffer
  87 (<a href='mailto:peter.pfeifer\@ipfire.org'>peter.pfeifer\@ipfire.org</a>)<br />
  88 Peter Sch&auml;lchli
  89 (<a href='mailto:peter.schaelchli\@ipfire.org'>peter.schaelchli\@ipfire.org</a>)<br />
  90 Jan Paul T&uuml;cking
  91 (<a href='mailto:jan.tuecking\@ipfire.org'>jan.tuecking\@ipfire.org</a>)<br />
  92 </p>
  93 <p>
  94 This product includes GeoLite data created by MaxMind, available from <a href='http://www.maxmind.com/' target="_blank">http://www.maxmind.com/</a>.
  95 </p>
  96 END
  97 ;
  98 &Header::closebox();
  99
 100 &Header::openbox('100%', 'left', 'General Public License v3');
 101 if ( -e "/usr/share/doc/licenses/GPLv3" )  {
 102         print '<textarea rows="25" cols="75" readonly="true">';
 103         print `cat "/usr/share/doc/licenses/GPLv3"`;
 104         print '</textarea>';
 105 }
 106 else {
 107         print '<br /><a href="http://www.gnu.org/licenses/gpl-3.0.txt" target="_blank">GENERAL PUBLIC LICENSE</a><br />';
 108 }
 109
 110 &Header::closebox();
 111
 112 &Header::closebigbox();
 113
 114 &Header::closepage();