Skip to content

Instantly share code, notes, and snippets.

@bitkevin

bitkevin/Install twiki with nginx on CentOS6.md

Last active November 21, 2016 08:54
Show Gist options
  • Save bitkevin/5841438 to your computer and use it in GitHub Desktop.
Save bitkevin/5841438 to your computer and use it in GitHub Desktop.
Download ZIP
Install twiki 5.1.4 with webserver nginx on centos6.
Raw
Install twiki with nginx on CentOS6.md

yum add EPEL

cd /tmp
wget http://mirror-fpt-telecom.fpt.net/fedora/epel/6/i386/epel-release-6-8.noarch.rpm
rpm -ivh epel-release-6-8.noarch.rpm
# 或者
rpm -ivh http://mirror-fpt-telecom.fpt.net/fedora/epel/6/x86_64/epel-release-6-8.noarch.rpm

install nginx fcgi-perl

yum install -y nginx fcgi-perl rcs
chkconfig --add nginx
chkconfig nginx on
/etc/init.d/nginx start

install perl modules

yum install -y gd perl perl-Algorithm-Diff perl-CGI perl-CGI-Session \
    perl-HTML-Tree perl-Error perl-FreezeThaw perl-Time-modules perl-Net-SMTP-SSL

Configure FastCGI Wrapper

vim /usr/bin/fastcgi-wrapper.pl, contents is below:

#!/usr/bin/perl

use FCGI;
use Socket;
use POSIX qw(setsid);

require 'syscall.ph';

&daemonize;

#this keeps the program alive or something after exec'ing perl scripts
END() { } BEGIN() { }
*CORE::GLOBAL::exit = sub { die "fakeexit\nrc=".shift()."\n"; };
eval q{exit};
if ($@) {
    exit unless $@ =~ /^fakeexit/;
};

&main;

sub daemonize() {
    chdir '/'                 or die "Can't chdir to /: $!";
    defined(my $pid = fork)   or die "Can't fork: $!";
    exit if $pid;
    setsid                    or die "Can't start a new session: $!";
    umask 0;
}

sub main {
        $socket = FCGI::OpenSocket( "127.0.0.1:8999", 10 ); #use IP sockets
        $request = FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%req_params, $socket );
        if ($request) { request_loop()};
            FCGI::CloseSocket( $socket );
}

sub request_loop {
        while( $request->Accept() >= 0 ) {

           #processing any STDIN input from WebServer (for CGI-POST actions)
           $stdin_passthrough ='';
           $req_len = 0 + $req_params{'CONTENT_LENGTH'};
           if (($req_params{'REQUEST_METHOD'} eq 'POST') && ($req_len != 0) ){
                my $bytes_read = 0;
                while ($bytes_read < $req_len) {
                        my $data = '';
                        my $bytes = read(STDIN, $data, ($req_len - $bytes_read));
                        last if ($bytes == 0 || !defined($bytes));
                        $stdin_passthrough .= $data;
                        $bytes_read += $bytes;
                }
            }

            #running the cgi app
            if ( (-x $req_params{SCRIPT_FILENAME}) &&  #can I execute this?
                 (-s $req_params{SCRIPT_FILENAME}) &&  #Is this file empty?
                 (-r $req_params{SCRIPT_FILENAME})     #can I read this file?
            ){
        pipe(CHILD_RD, PARENT_WR);
        my $pid = open(KID_TO_READ, "-|");
        unless(defined($pid)) {
            print("Content-type: text/plain\r\n\r\n");
                        print "Error: CGI app returned no output - ";
                        print "Executing $req_params{SCRIPT_FILENAME} failed !\n";
            next;
        }
        if ($pid > 0) {
            close(CHILD_RD);
            print PARENT_WR $stdin_passthrough;
            close(PARENT_WR);

            while(my $s = <KID_TO_READ>) { print $s; }
            close KID_TO_READ;
            waitpid($pid, 0);
        } else {
                    foreach $key ( keys %req_params){
                       $ENV{$key} = $req_params{$key};
                    }
                    # cd to the script's local directory
                    if ($req_params{SCRIPT_FILENAME} =~ /^(.*)\/[^\/]+$/) {
                            chdir $1;
                    }

            close(PARENT_WR);
            close(STDIN);
            #fcntl(CHILD_RD, F_DUPFD, 0);
            syscall(&SYS_dup2, fileno(CHILD_RD), 0);
            #open(STDIN, "<&CHILD_RD");
            exec($req_params{SCRIPT_FILENAME});
            die("exec failed");
        }
            }
            else {
                print("Content-type: text/plain\r\n\r\n");
                print "Error: No such CGI app - $req_params{SCRIPT_FILENAME} may not ";
                print "exist or is not executable by this process.\n";
            }

        }
}

create /etc/rc.d/init.d/perl-fastcgi

#!/bin/sh
#
# nginx – this script starts and stops the nginx daemon
#
# chkconfig: - 85 15
# description: Nginx is an HTTP(S) server, HTTP(S) reverse \
# proxy and IMAP/POP3 proxy server
# processname: nginx
# config: /opt/nginx/conf/nginx.conf
# pidfile: /opt/nginx/logs/nginx.pid

# Source function library.
. /etc/rc.d/init.d/functions

# Source networking configuration.
. /etc/sysconfig/network

# Check that networking is up.
[ "$NETWORKING" = "no" ] && exit 0

perlfastcgi="/usr/bin/fastcgi-wrapper.pl"
prog=$(basename perl)

lockfile=/var/lock/subsys/perl-fastcgi

start() {
    [ -x $perlfastcgi ] || exit 5
    echo -n $"Starting $prog: "
    daemon $perlfastcgi
    retval=$?
    echo
    [ $retval -eq 0 ] && touch $lockfile
    return $retval
}

stop() {
    echo -n $"Stopping $prog: "
    killproc $prog -QUIT
    retval=$?
    echo
    [ $retval -eq 0 ] && rm -f $lockfile
    return $retval
}

restart() {
    stop
    start
}

reload() {
    echo -n $”Reloading $prog: ”
    killproc $nginx -HUP
    RETVAL=$?
    echo
}

force_reload() {
    restart
}
rh_status() {
    status $prog
}

rh_status_q() {
    rh_status >/dev/null 2>&1
}

case "$1" in
    start)
        rh_status_q && exit 0
        $1
        ;;
    stop)
        rh_status_q || exit 0
        $1
        ;;
    restart)
        $1
        ;;
    reload)
        rh_status_q || exit 7
        $1
        ;;
    force-reload)
        force_reload
        ;;
    status)
        rh_status
        ;;
    condrestart|try-restart)
        rh_status_q || exit 0
        ;;
    *)
        echo $"Usage: $0 {start|stop|status|restart|condrestart|try-restart|reload|force-reload}"
        exit 2
    esac

set start on boot:

chmod +x /usr/bin/fastcgi-wrapper.pl
chmod +x /etc/rc.d/init.d/perl-fastcgi
/etc/rc.d/init.d/perl-fastcgi start
chkconfig --add perl-fastcgi
chkconfig perl-fastcgi on

setup your site

mkdir /var/www/hosts/wiki.example.com
cd /var/www/hosts/wiki.example.com
wget "http://downloads.sourceforge.net/project/twiki/TWiki%20for%20all%20Platforms/TWiki-5.1.4/TWiki-5.1.4.tgz?r=http%3A%2F%2Fzh.sourceforge.jp%2Fprojects%2Fsfnet_twiki%2Fdownloads%2FTWiki%2520for%2520all%2520Platforms%2FTWiki-5.1.4%2FTWiki-5.1.4.tgz%2F&ts=1371918979&use_mirror=jaist"
tar zxvf TWiki-5.1.4.tgz

nginx conf file

/etc/nginx/sites-enabled/wiki.example.com.conf

server {
    listen  80;
    server_name  wiki.example.com;

	root /var/www/hosts/wiki.example.com;

	access_log  /var/log/nginx/wiki.example.com.access.log  main;
	
	index /twiki/bin/view/Main/WebHome;

	location ~ ^/twiki/ {
	#	deny all;

		location ~ ^/twiki/pub/ { allow all; }

		location ~ ^/twiki/bin/configure {
#allow          *.*.*.*; # When you configure your TWiki, remove "#" and set your IP address.
			fastcgi_pass   127.0.0.1:8999;
			include        fastcgi_params;
			fastcgi_param  SCRIPT_FILENAME  $document_root$fastcgi_script_name;
		}

		location ~ ^/twiki/bin/ {
			allow all;
			fastcgi_pass   127.0.0.1:8999;
			fastcgi_split_path_info  ^(/twiki/bin/[^/]+)(/.*)$;
			include        fastcgi_params;
			fastcgi_param  PATH_INFO        $fastcgi_path_info;
			fastcgi_param  SCRIPT_FILENAME  $document_root$fastcgi_script_name;
		}
	}

}

then restart nginx:

/etc/init.d/nginx restart

configure twiki

configure your twiki throgh url: http://wiki.example.com/twiki/bin/configure

after configure, you must change nginx conf, add deny all; (after location ~ ^/twiki/ { ), restart you nginx.

enjoy

your twiki index page: http://wiki.example.com/twiki/bin/view/Main/WebHome

support chinese, configure:

# twiki/lib/LocalSite.cfg
$TWiki::cfg{UseLocale} = 1; 
$TWiki::cfg{Site}{Locale}   = 'zh-CN.UTF-8'; 
$TWiki::cfg{Site}{CharSet}  = 'UTF-8'; 
$TWiki::cfg{Site}{Lang}     = 'zh-CN'; 
$TWiki::cfg{Site}{FullLang} = 'zh-CN';

Disable WYSIWYG

# /Main/TWikiUsers
Set EDITMETHOD = raw

Disable Anonymous

# /Main/WebPreferences
Set DENYWEBVIEW = TWikiGuest
Set DENYWEBCHANGE = TWikiGuest
Set DENYWEBRENAME = TWikiGuest

Enable Breadcrumbs(get breadcrumbs back)

# /Main/WebPreferences
Set BREADCRUMBS = on

Edit twiki/lib/LocalSite.cfg:

TWiki::cfg{Register}{EnableNewUserRegistration} = 0;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment