Initial git commit with version 1.4
This commit is contained in:
Kim Holviala
commit
d829e6a347
|
|
@ -0,0 +1,251 @@
|
|||
2012-12-02 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 1.4
|
||||
* Added logcheck ignore file for Debian
|
||||
* Fixed compile without HAVE_SHMEM
|
||||
* Autogenerated caps.txt now works without SHMEM
|
||||
* Support for Haiku R1 (make && make install works)
|
||||
* CGIs now have $LOCAL_ADDR
|
||||
* Debian package no longer depends on lsb-release
|
||||
* CPU type is now properly detected on AIX
|
||||
* Makefile supports cross-compiling (CC & HOSTCC)
|
||||
* Option -nr disables root user checking (for debugging)
|
||||
* Platform detection for Linux/mips boards (routers)
|
||||
* Fixes for OpenBSD (thanks to Brian Callahan)
|
||||
* Last remaining sprintf() replaced with snprintf()
|
||||
* max() is no longer a function but a #define
|
||||
* Clang fixes (thanks to Jacob Dahl Pind)
|
||||
* Removed system-info.sh & dmidecode from Debian package
|
||||
|
||||
|
||||
2012-06-12 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 1.3
|
||||
* Support for headerless HTTP/0.9
|
||||
* Code cleanups
|
||||
* Platform probing now knows about RedHat and Slackware
|
||||
* lsb_release no longer gets called if it doesn't exist
|
||||
(bugreport from Jacob Dahl Pind)
|
||||
* Changed menu errors from type "i" text to type "3"
|
||||
(bugreport from Damien Carol)
|
||||
* Removed the special OSX Carbonized build
|
||||
* Fixed a bug in menu.c: popen() needs pclose()
|
||||
* Fixed a off-by-one in gopher_filetype()
|
||||
* Changed the filetype of documents (doc/ps/pdf) to "d"
|
||||
|
||||
|
||||
2012-05-04 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 1.2 (finally...)
|
||||
* On the fly selector rewriting (like Apache mod_rewrite)
|
||||
* Gophertags are properly converted to output charset
|
||||
* Server admin email can be specified for caps.txt
|
||||
* Server location for caps.txt
|
||||
* Split options.c from gophernicus.c
|
||||
* Removed support for Gopher over HTTP proxies
|
||||
* Hack to make "gopher example.com" work
|
||||
(UMN gopher client assumes gopher+ which we don't support)
|
||||
|
||||
|
||||
2010-12-01 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 1.1
|
||||
* Content-based detection of gif/png/jpg/ps/pdf/html/gz
|
||||
* Gophermap virtual host list (%) only lists FQDNs
|
||||
* Serve out caps.txt from a file if it exists
|
||||
* Option -na disables autogenerated caps.txt
|
||||
* Changed option -l to -b (show BSD license)
|
||||
* Changed option -m to -l (log to file)
|
||||
* README and LICENSE weren't zero-terminated strings (duh)
|
||||
* Querying /server-status no longer updates statistics
|
||||
(because Munin statistics collection was being throttled)
|
||||
* Internal charset variables are now enums and not strings
|
||||
|
||||
|
||||
2010-10-05 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 1.0
|
||||
* Support for caps.txt as suggested by Cameron Kaiser
|
||||
* Support for gophertags (lifted from Bucktooth)
|
||||
* HTTP requests are redirected to a public gopher proxy
|
||||
* Allow directories named "gophermap" and "gophertag"
|
||||
(only files are special)
|
||||
* Removed duplicate call to strniconv()
|
||||
* A few ENABLE_STRICT_RFC1436 additions
|
||||
* Much more descriptive error logging
|
||||
* Self references /./ are removed from request
|
||||
* Apache-compatible file logging in combined log format (-m)
|
||||
* FIFOs in directories no longer crash the server (duh!)
|
||||
* Support for Mac OS X (tested with 10.5 on Intel)
|
||||
* Reworked Makefile with platform-specific build targets
|
||||
* Fixed a call to dirname(path) (don't assume it modifies path)
|
||||
* Makefile installer now supports xinetd and launchd
|
||||
* Makefile installer installs default /var/gopher/gophermap and
|
||||
links the document directory as /docs/
|
||||
* Added SERVER_ARCH, SERVER_VERSION and SERVER_DESCRIPTION to
|
||||
CGI env variables
|
||||
* Fixed a segfault where shm was used uninitialized (duh!)
|
||||
* Generate native Debian/Ubuntu package with "make deb"
|
||||
* platform() now tries to figure out Linux distribution
|
||||
* platform() knows about Linux ARM boards
|
||||
* Added argument -nm (No shared Memory) for debugging
|
||||
* Fixed AIX make glitch when compiling bin2c (bug in make?)
|
||||
* Changed the name of the project from "Gophernicus Server"
|
||||
to plain "Gophernicus"
|
||||
* Menus without footer (-nf) were missing the dot at the end
|
||||
* Footer message is now right-aligned
|
||||
* server-status and caps.txt requests now update sessions
|
||||
* Compile-time option ENABLE_AUTOHIDING hides manually listed
|
||||
resources from generated menus (to prevent double listings)
|
||||
|
||||
|
||||
2010-07-03 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.9
|
||||
* Added option to disable HTTP-style query strings
|
||||
* Fixed a regression where some binary files were served out
|
||||
as text (which broke them)
|
||||
* BinHex files are now mapped to filetype 4
|
||||
* Disabling vhosting disables sessions (mostly)
|
||||
|
||||
|
||||
2010-04-30 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.8
|
||||
* Security bug in hURL handler fixed
|
||||
* Error pages are now correctly generated for type 'h'
|
||||
* Menu error page more compatible with clients
|
||||
* New macro sstrncmp() compares without explicit sizeof()
|
||||
* Removed all traces of gopher++ protocol (extra headers)
|
||||
as it just didn't work with older (circa '92) servers
|
||||
* Added option to disable automatic menu headers (titles)
|
||||
* Do a chdir() to the resource dir before doing anything
|
||||
* Double-slashes were slashed in QUERY_STRING by accident
|
||||
* Relative links to external hosts work properly in gophermap
|
||||
* Gophermaps can include other gophermaps with =/path/to/file
|
||||
* Executable gophermaps are parsed just like static ones
|
||||
|
||||
|
||||
2010-04-13 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.7
|
||||
* This release is feature complete, no new features in sight
|
||||
* Support for NetBSD (a typo prevented building - duh)
|
||||
* Replaced the poorly-working scandir() with opendir/qsort
|
||||
* Directory listings (menus) are limited to 1024 entries
|
||||
* Changed the filetype of movies from "v" to ";" (which sucks)
|
||||
* Fixed a compatibility issue with bucktooth gophermaps
|
||||
* Finally wrote decent documentation (README and INSTALL)
|
||||
|
||||
|
||||
2010-04-11 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.6
|
||||
* platform() results are kept in shared memory
|
||||
* Support for AIX 5.1 and newer
|
||||
* IPv4-in-IPv6 prefix ::ffff: is removed from remote_addr
|
||||
* Replaced install(1) with the install-sh script
|
||||
* /server-status CPULoad can be parsed from /usr/bin/uptime
|
||||
* Replaced text2c/hexdump with bin2c.c (less dependencies)
|
||||
* Files with extension .q (type 7 query) are considered CGIs
|
||||
* Filetype handling completely rewritten
|
||||
* Configurable gopher filetypes using the "-e ext=X" argument
|
||||
* Per-directory filetype overrides in gophermaps with ":ext=X"
|
||||
* Refuse to serve out gophermaps (why didn't I catch this before?)
|
||||
* Cleaned up main()
|
||||
* Output filters - run files through an external program (php!)
|
||||
|
||||
|
||||
2010-04-05 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.5
|
||||
* Code tested to work on 32-bit Linux/armv5tel
|
||||
* Filetype 7 query errors are now handled properly
|
||||
* HTTP-style query string overrides type 7 query
|
||||
* Protocol detection (0/+/++) works properly
|
||||
* gopher++ extra headers parsed correctly
|
||||
* gopher++ works ok with a patched NSCA Mosaic!
|
||||
* ISO-8859-1 (Latin-1) output
|
||||
* Full UTF-8 output support (without widechars)
|
||||
* Gophermaps are converted to output charset
|
||||
* All type 0 output is converted to output charset
|
||||
* All charset conversions can be disabled with option -no
|
||||
* !Titles in gophermaps are converted to gopher menu titles
|
||||
* Automatically generates gopher title resources for menus
|
||||
* Compile-time option to strictly adhere to RFC 1436
|
||||
* Compile-time option to disable all gopher++ support
|
||||
|
||||
|
||||
2010-03-29 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.4
|
||||
* Renamed the project to "Gophernicus Server"
|
||||
* Major rewrite with much cleaner code
|
||||
* Changed all strncpy's to the OpenBSD strlcpy
|
||||
* Server can guess the request type (menu/text/binary)
|
||||
* Errors are formatted for current filetype (menu/text)
|
||||
* Errors for images (types g&I) are outputted as an image
|
||||
* /~luser (/home/luser/public_gopher) must be owned by luser
|
||||
* Configurable output width for menus
|
||||
* Files are outputted using sendfile() if available
|
||||
* Locale forced to POSIX for strftime()
|
||||
* Filetype '-' in gophermaps hides files
|
||||
* Gopher+ requests are now handled gracefully
|
||||
* Relative selectors in gophemaps work
|
||||
* Filesizes in menus are now human-readable (KB/MB/GB etc)
|
||||
* Refuse to serve world-writeable content
|
||||
* Support for Apache-style /server-status
|
||||
* HTTP requests for /server-status work (munin monitoring ftw!)
|
||||
* Session tracking using shared memory
|
||||
* Referer support for CGIs
|
||||
* Replaced iconv() with own charset conversion routine
|
||||
* Automatic throttling for users who hit the server too much
|
||||
* Replaced static compile-time uname with uname()
|
||||
* Support for virtual hosting (with gopher0 no less!)
|
||||
|
||||
|
||||
2010-01-07 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.3
|
||||
* Automatic detection of text vs. binary filetype for files
|
||||
which have no (known) suffix
|
||||
* hURL redirect pages now respect -f (no footer) option
|
||||
* IPv6 support for logging & CGI REMOTE_ADDR
|
||||
* Inline gophermaps
|
||||
* Removed support for relative resource names in gophermaps
|
||||
* Support for virtual userdirs (~user -> /home/user/public_gopher)
|
||||
* Automatic listing of userdirs in gophermap
|
||||
* Redirect accidental http requests to gopher
|
||||
* License included in the binary -> install no longer installs docs
|
||||
* Changed command line options (I was running out of arg letters...)
|
||||
* Debug to syslog with '-d' option
|
||||
|
||||
|
||||
2010-01-02 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.2
|
||||
* Logging to syslog
|
||||
* Support for gophermaps
|
||||
* Support for executable gophermaps
|
||||
* Support for CGI scripts
|
||||
* Support for type 7 search queries
|
||||
* Support for hURL redirect pages
|
||||
* Support for non-ASCII resource/file names (tested with UTF-8)
|
||||
* Support for both %hex and #octal request encodings
|
||||
* Try to get server hostname from $HOSTNAME or gethostname()
|
||||
* Basic support for different platforms via HAVE_XX defines
|
||||
|
||||
|
||||
2009-12-30 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Released version 0.1
|
||||
* Basic rfc1436 functionality works
|
||||
* Fancy menus with file dates & sizes
|
||||
* Options via command line (with sensible defaults)
|
||||
|
||||
|
||||
2009-12-28 Kim Holviala <kim@holviala.com>
|
||||
|
||||
* Started coding kgopherd
|
||||
* Trying to remember how "C" works...
|
||||
|
||||
|
|
@ -0,0 +1,113 @@
|
|||
Compiling and installing Gophernicus
|
||||
====================================
|
||||
|
||||
Gophernicus requires a C compiler but no extra libraries aside
|
||||
from standard LIBC ones. Care has been taken to use only
|
||||
standard POSIX syscalls so that it should work pretty much on
|
||||
any *nix system. Compiling has only been tested with GCC, but
|
||||
it will most likely work with others too.
|
||||
|
||||
To compile and install run:
|
||||
|
||||
$ gzip -cd gophernicus-*.tar.gz | tar xvf -
|
||||
$ cd gophernicus-*
|
||||
$ make
|
||||
$ sudo make install
|
||||
|
||||
Then add the below line to your /etc/inetd.conf and restart
|
||||
inetd. If your system comes with something else than standard
|
||||
inetd "make install" should have done the right thing already.
|
||||
|
||||
gopher stream tcp nowait nobody /usr/sbin/in.gophernicus in.gophernicus -h <hostname>
|
||||
|
||||
The -h <hostname> parameter is mandatory for a properly working
|
||||
Gophernicus. Other parameters can also be added, see the full
|
||||
list by running "/usr/sbin/in.gophernicus -?"
|
||||
|
||||
By default Gophernicus serves gopher documents from /var/gopher
|
||||
although that can be changed by using the -r <root> parameter.
|
||||
To enable virtual hosting create hostname directories under
|
||||
the gopher root and make sure you have at least the primary
|
||||
hostname (the one set with -h <hostname>) directory available
|
||||
(mkdir /var/gopher/$HOSTNAME).
|
||||
|
||||
|
||||
Compiling on Debian Linux (and Ubuntu)
|
||||
======================================
|
||||
|
||||
The above commands work on Debian just fine, but if you prefer
|
||||
having everything installed as packages run "make deb" instead
|
||||
of plain "make". If all the dependencies were in place you'll
|
||||
end up with an offical-looking deb package in the parent
|
||||
directory (don't ask - that's just how it works). And instead
|
||||
of "sudo make install" you should just install the deb with
|
||||
"dpkg -i ../gophernicus_*.deb" after which It Should Just
|
||||
Work(tm).
|
||||
|
||||
|
||||
Compiling on Mac OS X
|
||||
=====================
|
||||
|
||||
When you run "make install" on OSX-like system with launchd
|
||||
the install routine also installs a plist file and tells launchd
|
||||
to start the server up. In other words, It Just Works(tm).
|
||||
|
||||
|
||||
Cross-compiling
|
||||
===============
|
||||
|
||||
Cross-compiling to a different target architecture can be done
|
||||
by defining HOSTCC and CC to be different compilers. HOSTCC
|
||||
must point to a local arch compiler, and CC to the target
|
||||
arch one.
|
||||
|
||||
$ make HOSTCC=gcc CC=target-arch-gcc
|
||||
|
||||
|
||||
Shared memory issues
|
||||
====================
|
||||
|
||||
Gophernicus uses SYSV shared memory for session tracking and
|
||||
statistics. It creates the shared memory block using mode 600
|
||||
and a predefined key which means that a shared memory block
|
||||
created with one user cannot be used by another user. Simply
|
||||
said, running in.gophernicus as yourself will allocate that
|
||||
memory, and then running the binary through inetd as another
|
||||
user (nobody) will be denied access to that memory.
|
||||
|
||||
If that happens you can simply delete the memory block and
|
||||
let Gophernicus recreate it - no harm done.
|
||||
|
||||
$ su -
|
||||
# ipcs -m | grep beeb
|
||||
# ipcrm -M <key from the above command>
|
||||
|
||||
|
||||
Porting to different platforms
|
||||
==============================
|
||||
|
||||
If you need to port Gophernicus to a new platform, please take
|
||||
a look at gophernicus.h which has a bunch of HAVE_* #defines.
|
||||
Fiddling with those usually makes it possible to compile a working
|
||||
server. If you succeed in compiling Gophernicus to a new
|
||||
platform please send the patches to kim@holviala.com so I can
|
||||
include them into the next release.
|
||||
|
||||
Tested (and semi-supported) platforms include:
|
||||
|
||||
OS Arch Compiler
|
||||
+-------------+-------------+-------------+
|
||||
AIX 5.1 POWER3 gcc 4
|
||||
AIX 6.1 POWER4 gcc 4
|
||||
AIX 7.1 POWER5 gcc 4
|
||||
CentOS 5.5 x86_64 gcc 4
|
||||
Debian Linux x86_64 gcc 4
|
||||
Debian Linux armv5tel gcc 4
|
||||
MacOSX 10.5 i386 gcc 4
|
||||
MacOSX 10.7 x86_64 llvm-gcc 4
|
||||
MacOSX 10.8 x86_64 clang 3
|
||||
NetBSD 5.0 x86_64 gcc 4
|
||||
Haiku R1 i386 gcc 2
|
||||
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,22 @@
|
|||
Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
All rights reserved.
|
||||
|
||||
Redistribution and use in source and binary forms, with or without
|
||||
modification, are permitted provided that the following conditions are met:
|
||||
* Redistributions of source code must retain the above copyright
|
||||
notice, this list of conditions and the following disclaimer.
|
||||
* Redistributions in binary form must reproduce the above copyright
|
||||
notice, this list of conditions and the following disclaimer in the
|
||||
documentation and/or other materials provided with the distribution.
|
||||
|
||||
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
|
||||
|
|
@ -0,0 +1,248 @@
|
|||
##
|
||||
## Gophernicus server Makefile
|
||||
##
|
||||
|
||||
#
|
||||
# Variables and default configuration
|
||||
#
|
||||
NAME = gophernicus
|
||||
PACKAGE = $(NAME)
|
||||
BINARY = in.$(NAME)
|
||||
VERSION = 1.4
|
||||
|
||||
SOURCES = $(NAME).c file.c menu.c string.c platform.c session.c options.c
|
||||
HEADERS = functions.h files.h
|
||||
OBJECTS = $(SOURCES:.c=.o)
|
||||
DOCS = LICENSE README INSTALL TODO ChangeLog README.Gophermap gophertag
|
||||
|
||||
INSTALL = PATH=$$PATH:/usr/sbin ./install-sh -o 0 -g 0
|
||||
DESTDIR = /usr
|
||||
SBINDIR = $(DESTDIR)/sbin
|
||||
DOCDIR = $(DESTDIR)/share/doc/$(PACKAGE)
|
||||
|
||||
ROOT = /var/gopher
|
||||
OSXROOT = /Library/GopherServer
|
||||
WRTROOT = /gopher
|
||||
MAP = gophermap
|
||||
|
||||
INETD = /etc/inetd.conf
|
||||
XINETD = /etc/xinetd.d
|
||||
LAUNCHD = /Library/LaunchDaemons
|
||||
PLIST = org.gophernicus.server.plist
|
||||
NET_SRV = /boot/common/settings/network/services
|
||||
|
||||
DIST = $(PACKAGE)-$(VERSION)
|
||||
TGZ = $(DIST).tar.gz
|
||||
RELDIR = /var/gopher/gophernicus.org/software/gophernicus/server/
|
||||
|
||||
CC = gcc
|
||||
HOSTCC = $(CC)
|
||||
CFLAGS = -O2 -Wall
|
||||
LDFLAGS =
|
||||
|
||||
|
||||
#
|
||||
# Platform support, compatible with both BSD and GNU make
|
||||
#
|
||||
all:
|
||||
@case `uname` in \
|
||||
Darwin) $(MAKE) ROOT="$(OSXROOT)" $(BINARY); ;; \
|
||||
Haiku) $(MAKE) EXTRA_LDFLAGS="-lnetwork" $(BINARY); ;; \
|
||||
*) $(MAKE) $(BINARY); ;; \
|
||||
esac
|
||||
|
||||
generic: $(BINARY)
|
||||
|
||||
|
||||
#
|
||||
# Special targets
|
||||
#
|
||||
deb:
|
||||
dpkg-buildpackage -rfakeroot -uc -us
|
||||
|
||||
|
||||
#
|
||||
# Building
|
||||
#
|
||||
$(NAME).c: $(NAME).h $(HEADERS)
|
||||
|
||||
$(BINARY): $(OBJECTS)
|
||||
$(CC) $(LDFLAGS) $(EXTRA_LDFLAGS) $(OBJECTS) -o $@
|
||||
|
||||
.c.o:
|
||||
$(CC) -c $(CFLAGS) $(EXTRA_CFLAGS) -DVERSION="\"$(VERSION)\"" -DDEFAULT_ROOT="\"$(ROOT)\"" $< -o $@
|
||||
|
||||
|
||||
headers: $(HEADERS)
|
||||
@echo
|
||||
|
||||
functions.h:
|
||||
echo "/* Automatically generated function definitions */" > $@
|
||||
echo >> $@
|
||||
grep -h "^[a-z]" $(SOURCES) | grep -v "int main" | sed -e "s/ =.*$$//" -e "s/ *$$/;/" >> $@
|
||||
@echo
|
||||
|
||||
bin2c: bin2c.c
|
||||
$(HOSTCC) bin2c.c -o $@
|
||||
@echo
|
||||
|
||||
files.h: bin2c
|
||||
sed -n -e "1,/^ $$/p" README > README.options
|
||||
./bin2c -0 -n README README.options > $@
|
||||
./bin2c -0 LICENSE >> $@
|
||||
./bin2c -n ERROR_GIF error.gif >> $@
|
||||
@echo
|
||||
|
||||
|
||||
#
|
||||
# Cleanup after building
|
||||
#
|
||||
clean: clean-build clean-deb
|
||||
|
||||
clean-build:
|
||||
rm -f $(BINARY) $(OBJECTS) $(TGZ) $(HEADERS) README.options bin2c
|
||||
|
||||
clean-deb:
|
||||
if [ -d debian/$(PACKAGE) ]; then fakeroot debian/rules clean; fi
|
||||
|
||||
|
||||
#
|
||||
# Install targets
|
||||
#
|
||||
install:
|
||||
@case `uname` in \
|
||||
Darwin) $(MAKE) ROOT="$(OSXROOT)" install-files install-docs install-root install-osx install-done; ;; \
|
||||
Haiku) $(MAKE) SBINDIR=/boot/common/bin DOCDIR=/boot/common/share/doc/$(PACKAGE) \
|
||||
install-files install-docs install-root install-haiku install-done; ;; \
|
||||
*) $(MAKE) install-files install-docs install-root; ;; \
|
||||
esac
|
||||
@if [ -d "$(XINETD)" ]; then $(MAKE) install-xinetd install-done; fi
|
||||
@if [ -f "$(INETD)" ]; then $(MAKE) install-inetd; fi
|
||||
|
||||
.PHONY: install
|
||||
|
||||
install-done:
|
||||
@echo
|
||||
@echo "======================================================================"
|
||||
@echo
|
||||
@echo "Gophernicus has now been succesfully installed. To try it out, launch"
|
||||
@echo "your favorite gopher browser and navigate to this URL:"
|
||||
@echo
|
||||
@echo " gopher://`hostname`/"
|
||||
@echo
|
||||
@echo "======================================================================"
|
||||
@echo
|
||||
|
||||
install-files:
|
||||
mkdir -p $(SBINDIR)
|
||||
$(INSTALL) -s -m 755 $(BINARY) $(SBINDIR)
|
||||
@echo
|
||||
|
||||
install-docs:
|
||||
mkdir -p $(DOCDIR)
|
||||
$(INSTALL) -m 644 $(DOCS) $(DOCDIR)
|
||||
@echo
|
||||
|
||||
install-root:
|
||||
if [ ! -d "$(ROOT)" ]; then \
|
||||
mkdir -p $(ROOT); \
|
||||
$(INSTALL) -m 644 $(MAP) $(ROOT); \
|
||||
ln -s $(DOCDIR) $(ROOT)/docs; \
|
||||
fi
|
||||
@echo
|
||||
|
||||
install-inetd:
|
||||
@echo
|
||||
@echo "======================================================================"
|
||||
@echo
|
||||
@echo "Looks like your system has the traditional internet superserver inetd."
|
||||
@echo "Automatic installations aren't supported, so please add the following"
|
||||
@echo "line to the end of your /etc/inetd.conf and restart or kill -HUP the"
|
||||
@echo "inetd process."
|
||||
@echo
|
||||
@echo "gopher stream tcp nowait nobody $(SBINDIR)/$(BINARY) $(BINARY) -h `hostname`"
|
||||
@echo
|
||||
@echo "======================================================================"
|
||||
@echo
|
||||
|
||||
install-xinetd:
|
||||
if [ -d "$(XINETD)" -a ! -f "$(XINETD)/$(NAME)" ]; then \
|
||||
sed -e "s/@HOSTNAME@/`hostname`/g" $(NAME).xinetd > $(XINETD)/$(NAME); \
|
||||
[ -x /sbin/service ] && /sbin/service xinetd reload; \
|
||||
fi
|
||||
@echo
|
||||
|
||||
install-osx:
|
||||
if [ -d "$(LAUNCHD)" -a ! -f "$(LAUNCHD)/$(PLIST)" ]; then \
|
||||
sed -e "s/@HOSTNAME@/`hostname`/g" org.gophernicus.server.plist > \
|
||||
$(LAUNCHD)/$(PLIST); \
|
||||
launchctl load $(LAUNCHD)/$(PLIST); \
|
||||
fi
|
||||
@echo
|
||||
chown -h root:admin $(ROOT) $(ROOT)/*
|
||||
chmod -h 0775 $(ROOT) $(ROOT)/docs
|
||||
@echo
|
||||
|
||||
install-haiku:
|
||||
if [ -f "$(NET_SRV)" -a ! "`grep -m1 gopher $(NET_SRV)`" ]; then \
|
||||
(echo ""; \
|
||||
echo "service gopher {"; \
|
||||
echo " family inet"; \
|
||||
echo " protocol tcp"; \
|
||||
echo " port 70"; \
|
||||
echo " launch in.gophernicus -h `hostname`"; \
|
||||
echo "}") >> $(NET_SRV); \
|
||||
fi
|
||||
@echo
|
||||
chown user:root $(DOCDIR)/* $(SBINDIR)/$(BINARY) $(ROOT)/$(MAP)
|
||||
@echo
|
||||
ps | grep net_server | grep -v grep | awk '{ print $$2 }' | xargs kill
|
||||
nohup /boot/system/servers/net_server >/dev/null 2>/dev/null &
|
||||
@echo
|
||||
|
||||
#
|
||||
# Uninstall targets
|
||||
#
|
||||
uninstall: uninstall-xinetd uninstall-launchd
|
||||
rm -f $(SBINDIR)/$(BINARY)
|
||||
for DOC in $(DOCS); do rm -f $(DOCDIR)/$$DOC; done
|
||||
rmdir -p $(SBINDIR) $(DOCDIR) 2>/dev/null || true
|
||||
@echo
|
||||
|
||||
uninstall-xinetd:
|
||||
if grep -q $(BINARY) "$(XINETD)/gopher" 2>/dev/null; then \
|
||||
rm -f $(XINETD)/gopher; \
|
||||
[ -x /sbin/service ] && service xinetd reload; \
|
||||
fi
|
||||
@echo
|
||||
|
||||
uninstall-launchd:
|
||||
if [ -f $(LAUNCHD)/$(PLIST) ]; then \
|
||||
launchctl unload $(LAUNCHD)/$(PLIST); \
|
||||
rm -f $(LAUNCHD)/$(PLIST); \
|
||||
fi
|
||||
if [ -L $(ROOT) ]; then \
|
||||
rm -f $(ROOT); \
|
||||
fi
|
||||
@echo
|
||||
|
||||
|
||||
#
|
||||
# Release targets
|
||||
#
|
||||
dist: clean functions.h
|
||||
mkdir -p /tmp/$(DIST)
|
||||
tar -cf - ./ | (cd /tmp/$(DIST) && tar -xf -)
|
||||
(cd /tmp/ && tar -cvf - $(DIST)) | gzip > $(TGZ)
|
||||
rm -rf /tmp/$(DIST)
|
||||
|
||||
release: dist
|
||||
cp $(TGZ) $(RELDIR)
|
||||
|
||||
|
||||
#
|
||||
# List all C defines
|
||||
#
|
||||
defines:
|
||||
$(CC) -dM -E $(NAME).c
|
||||
|
||||
|
|
@ -0,0 +1,237 @@
|
|||
Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
|
||||
Gophernicus is a modern full-featured (and hopefully) secure gopher
|
||||
daemon for inetd. It is licensed under the BSD license.
|
||||
|
||||
Command line options:
|
||||
-h hostname Change server hostname (FQDN) [$HOSTNAME]
|
||||
-p port Change server port [70]
|
||||
-r root Change gopher root [/var/gopher]
|
||||
-t type Change default gopher filetype [0]
|
||||
-g mapfile Change gophermap file [gophermap]
|
||||
-a tagfile Change gophertag file [gophertag]
|
||||
-c cgidir Change CGI script directory [/cgi-bin/]
|
||||
-u userdir Change users personal gopherspace [public_gopher]
|
||||
-l logfile Log to Apache-compatible combined format logfile
|
||||
|
||||
-w width Change default page width [70]
|
||||
-o charset Change default output charset [US-ASCII]
|
||||
|
||||
-s seconds Session timeout in seconds [1800]
|
||||
-i hits Maximum hits until throttling [4096]
|
||||
-k kbytes Maximum transfer until throttling [4194304]
|
||||
|
||||
-f filterdir Specify directory for output filters
|
||||
-e ext=type Map file extension to gopher filetype
|
||||
-R old=new Rewrite the beginning of a selector
|
||||
|
||||
-D text|file Set or load server description for caps.txt
|
||||
-L text|file Set or load server location for caps.txt
|
||||
-A admin Set admin email for caps.txt
|
||||
|
||||
-nv Disable virtual hosting
|
||||
-nl Disable parent directory links
|
||||
-nh Disable menu header (title)
|
||||
-nf Disable menu footer
|
||||
-nd Disable dates and filesizes in menus
|
||||
-nc Disable file content detection
|
||||
-no Disable charset conversion for output
|
||||
-nq Disable HTTP-style query strings (?query)
|
||||
-ns Disable logging to syslog
|
||||
-na Disable autogenerated caps.txt
|
||||
-nm Disable shared memory use (for debugging)
|
||||
-nr Disable root user checking (for debugging)
|
||||
|
||||
-d Debug to syslog (not for production use)
|
||||
-b Display the BSD license
|
||||
-? Display this help
|
||||
|
||||
|
||||
Setting up a gopher site
|
||||
========================
|
||||
|
||||
After succesfully installing Gophernicus (see INSTALL) you need to set
|
||||
up the gopher root directory. By default Gophernicus serves documents
|
||||
from /var/gopher so start by creating that directory and making sure
|
||||
it's world-readable. Then, simply add files and directories under your
|
||||
root, fire up a gopher browser (Firefox, Lynx) and open up this URL:
|
||||
|
||||
gopher://<HOSTNAME>/ (where <HOSTNAME> is your servers hostname)
|
||||
|
||||
That's it, your first gopher site is now up and running. If the links
|
||||
on the root menu don't work, make sure you are using the -h <HOSTNAME>
|
||||
parameter in your inetd.conf (with a valid resolveable hostname
|
||||
instead of <HOSTNAME> - see INSTALL).
|
||||
|
||||
|
||||
Security
|
||||
========
|
||||
|
||||
Gophernicus has been written with high security in mind. There should
|
||||
be no buffer overflows or memory allocation problems so it should be
|
||||
safe to run a publicly available gopher server with Gophernicus.
|
||||
|
||||
However, the security settings (which are non-changeable) are so strict
|
||||
that you need to keep one thing in mind. Gophernicus will only serve
|
||||
world-readable content. Being readable by the server process is not
|
||||
enough, all files and directories MUST be world-readable or they are
|
||||
simply hidden from all listings and denied if a client asks for them.
|
||||
|
||||
|
||||
Gophermaps
|
||||
==========
|
||||
|
||||
By default all gopher menus are automatically generated from the
|
||||
content of the directory being viewed. If you want to have
|
||||
informational text along with the files, or if you want to completely
|
||||
replace the generated menu with your own you need to take a look at
|
||||
gophermaps. See the file README.gophermap for more information.
|
||||
|
||||
|
||||
Gophertags
|
||||
==========
|
||||
|
||||
A gophertag file can be used to virtually rename a directory. Let's
|
||||
assume that you have a directory called "foo" somewhere - it will
|
||||
be listed as "foo" in all automatically generated menus. Now if you
|
||||
create a file foo/gophertag and put the text "bar" into it the menus
|
||||
will show "bar" but the links will still point to "foo". This is
|
||||
useful for creating descriptive names for directories without
|
||||
littering the file system with spaces and weird characters.
|
||||
|
||||
|
||||
Personal gopherspaces
|
||||
=====================
|
||||
|
||||
Gophernicus supports users personal gopherspaces. If a user has
|
||||
world-readable directory called public_gopher/ under his home, a
|
||||
request for gopher://<HOSTNAME>/1/~user/ will serve documents from
|
||||
that directory.
|
||||
|
||||
|
||||
Virtual hosting
|
||||
===============
|
||||
|
||||
Gophernicus supports virtual hosting, or serving more than one logical
|
||||
domain using the same IP address. Since gopher (RFC1436) doesn't
|
||||
support virtual hosting this requires some clever (but mostly invisble)
|
||||
hacks.
|
||||
|
||||
To enable virtual hosting create one or more directories under your
|
||||
gopher root which are named after your domain names. The primary vhost
|
||||
directory (set with the -h <HOSTNAME> option) must exist or virtual
|
||||
hosting will be disabled. Then simply add content to the hostname
|
||||
directories and you're up and running.
|
||||
|
||||
Almost.
|
||||
|
||||
To make gopher clients work properly with virtual hosting, create a
|
||||
root gophermap for each of your domains and include the "%" type
|
||||
character to create a list of all available virtual hosts (see
|
||||
README.gophermap). The generated virtual host links will be created so
|
||||
that standard gopher clients will find the correct domain even when
|
||||
they don't specifically tell the server which host they're trying to
|
||||
reach.
|
||||
|
||||
|
||||
CGI support
|
||||
===========
|
||||
|
||||
Gophernicus supports most parts of the CGI/1.1 standard. Most standard
|
||||
CGI variables are set, and some non-standard ones are added.
|
||||
|
||||
By default all scripts and binaries under any directory called
|
||||
/cgi-bin/ are executed as CGI scripts (this includes cgi-bin
|
||||
directories under users personal gopherspaces). Also, if a gophermap
|
||||
is marked executable it is also processed as an CGI script.
|
||||
|
||||
As with regular files, CGI scripts must be world-executable (and
|
||||
readable) or they will be ignored. Make sure your CGI script is safe
|
||||
with ANY user input as poorly coded CGI scripts are the number #1
|
||||
security problem with publicly open *nix servers.
|
||||
|
||||
|
||||
Output filtering and PHP support
|
||||
================================
|
||||
|
||||
In addition to CGI scripts Gophernicus supports output filtering
|
||||
scripts. By default output filtering is turned off, but you can turn
|
||||
it on by using the -f <FILTERDIR> option, creating that directory
|
||||
and creating one or more scripts in there named by either the file
|
||||
suffix, or by the gopher filetype char.
|
||||
|
||||
If a file is to be served out which matches either the file suffix
|
||||
script, or the filetype script then instead of simply sending the
|
||||
file to client the output filter script is executed with the
|
||||
original file as the first parameter and the output of the script
|
||||
is then sent to client.
|
||||
|
||||
For PHP support install the CLI version of the PHP interpreter and
|
||||
then symlink (or copy) that binary to the directory specified with
|
||||
-f option using the destination name "php".
|
||||
|
||||
$ ln -s /usr/bin/php5-cli /usr/lib/gophernicus/filters/php
|
||||
|
||||
After that all files with the php suffix will be "filtered" through
|
||||
the PHP command line interpreter. In other words, PHP starts working.
|
||||
And don't use the CGI version of PHP as it outputs HTTP headers the
|
||||
gopher protocol doesn't have.
|
||||
|
||||
|
||||
Charset support and conversions
|
||||
===============================
|
||||
|
||||
Gophernicus supports three charsets: US-ASCII, ISO-8859-1 and UTF-8.
|
||||
All textual input is internally upconverted to UTF-8 and then
|
||||
downconverted to whatever charset the client is asking for. The
|
||||
conversion is input autosensing which means that you don't have to
|
||||
specify your filesystem charset, or the charset of your text files -
|
||||
it's all detected automatically.
|
||||
|
||||
With standard gopher clients this is a bit of a problem as your text
|
||||
files WILL be converted to 7-bit US-ASCII. This means that all 8-bit
|
||||
charaters WILL BE LOST. This decision was made because no gopher
|
||||
client that I tested was reliably cabable of decoding anything else
|
||||
than pure US-ASCII. If you want to disable the conversion use the
|
||||
"-no" option, or if you'd like to change the default output charset to
|
||||
something else than US-ASCII just use for example the "-o ISO-8859-1"
|
||||
option.
|
||||
|
||||
|
||||
Selector rewriting
|
||||
==================
|
||||
|
||||
Selector rewriting lets you rewrite parts of the selector on the fly.
|
||||
Well, not parts, but really just the start of it. And the rewrite
|
||||
enging here is nothing like Apache's mod_rewrite as I was too lazy
|
||||
to integrate any regex libraries... So, all it does is rewrite a
|
||||
fixed string at the start of the selector to something else. This
|
||||
will let you move your directories around while making sure that
|
||||
existing deeplinks still work.
|
||||
|
||||
Examples:
|
||||
|
||||
-R "/~user=/~luser"
|
||||
-R "/old-dir=/new-dir"
|
||||
|
||||
|
||||
Session tracking and statistics
|
||||
===============================
|
||||
|
||||
To enable virtual hosting with gopher (RFC1436) clients Gophernicus
|
||||
tracks users and their session. As a side effect of that session
|
||||
tracking, Gophernicus has simple throttling controls to keep nasty
|
||||
users from killing your precious 120MHz PPC 604e server from dying
|
||||
under the load. The throttling defaults are high enough that normal
|
||||
human users will never hit the limits, but it's possible (and mostly
|
||||
preferrable) that a badly behaving crawling agent will be throttled.
|
||||
|
||||
The current sessions and other real-time status data can be viewed
|
||||
by opening the URL gopher://<HOSTNAME>/0/server-status . This status
|
||||
view has been modeled after the Apache server-status which means
|
||||
that it's possible to integrate Gophernicus into existing server
|
||||
monitoring systems. To ease up such integrations, Gophernicus
|
||||
supports HTTP requests of the server-status page using an URL like
|
||||
http://<HOSTNAME>:70/server-status?auto
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,109 @@
|
|||
!Sample gophermap for Gophernicus
|
||||
|
||||
##
|
||||
## This is a sample gophermap.
|
||||
##
|
||||
#
|
||||
Creating a file called "gophermap" into a directory disables the
|
||||
normal resource listing and replaces it with the contents of the map
|
||||
file. You can also have inline gophermaps - files with a ".gophermap"
|
||||
extension are parsed as gophermaps and displayed in between normal
|
||||
resources in alphabetical order.
|
||||
|
||||
In a gophermap any line that doesn't contain a <TAB> character is
|
||||
automatically converted to an type "i" gopher resource which are
|
||||
displayed as plain text in the client. Lines which contain tabs are
|
||||
intepreted as gopher resource lines which the client will render as
|
||||
links. The first line of a gophermap should be a !Title line
|
||||
describing the menu.
|
||||
|
||||
Dynamic gophermaps are possible by making the gophermap a script and
|
||||
marking it as executable. All script output is parsed just like a
|
||||
static gophermap, for example lines without tabs are converted to "i"
|
||||
resources. Executable gophermaps are always ran through the default
|
||||
shell (/bin/sh) so depending on your operating system that's either
|
||||
slow, or really unbearably slow...
|
||||
|
||||
The format of a gophermap resource line is simple:
|
||||
Xname<TAB>selector<TAB>host<TAB>port
|
||||
|
||||
Where:
|
||||
X is the gopher filetype
|
||||
name is an explanation of the resource
|
||||
selector is the path to resource
|
||||
host:port are the hostname and port number to go to
|
||||
|
||||
Type and name are mandatory. If you don't specify a selector, the
|
||||
name field will be also used as the selector. If you don't specify
|
||||
host or port the host:port of the current server are used instead.
|
||||
Also make sure to use ONLY ONE TAB between the fields.
|
||||
|
||||
Valid filetypes include:
|
||||
0 text file
|
||||
1 directory
|
||||
3 error message
|
||||
5 archive file (zip, tar etc)
|
||||
7 search query
|
||||
8 telnet session
|
||||
9 binary file
|
||||
g GIF image
|
||||
h HTML file
|
||||
i info text
|
||||
I generic image file (other than GIF)
|
||||
d document file (ps, pdf, doc etc)
|
||||
s sound file
|
||||
; video file
|
||||
c calendar file
|
||||
M MIME file (mbox, emails etc)
|
||||
|
||||
Additional type characters supported by Gophernicus:
|
||||
# comment - rest of the line is ignored
|
||||
!title menu title (use on the first line)
|
||||
-file hide the file from listings
|
||||
:ext=type change filetype (for this directory only)
|
||||
~ include a list of users with valid ~/public_gopher
|
||||
% include a list of available virtual hosts
|
||||
=mapfile include or execute other gophermap
|
||||
* stop processing gophermap, include file listing
|
||||
. stop processing gophermap (default)
|
||||
|
||||
Examples of valid resource lines:
|
||||
|
||||
1subdir
|
||||
1Relative internal link subdir
|
||||
1Absolute internal link /subdir
|
||||
1External link / gopher.floodgap.com 70
|
||||
1External relative link (which shouldn't work) subdir/ gopher.domain.dom 70
|
||||
0Finger-to-gopher link kim holviala.com 79
|
||||
hLink to a website URL:http://www.google.com/
|
||||
|
||||
hLink to a local html page /path/to/file.html
|
||||
5Link to an tar archive /path/to/archive.tar.gz
|
||||
9Link to a binary file /path/to/binary
|
||||
|
||||
7Search engine query /query
|
||||
8Telnet session kim holviala.com 79
|
||||
|
||||
# Hide a few files from the menu listing generated by *
|
||||
-hiddenfile.txt
|
||||
-hiddendir
|
||||
|
||||
# Change filetypes for this directory
|
||||
:png=g
|
||||
:foo=b
|
||||
|
||||
Include links to users own gopherspaces:
|
||||
~
|
||||
|
||||
List all available virtual hosts:
|
||||
%
|
||||
|
||||
Include sub-gophermap:
|
||||
=LICENSE
|
||||
|
||||
Execute script and parse output as subgophermap:
|
||||
=/usr/bin/uptime
|
||||
|
||||
Here we stop processing the gophermap and include the regular menu:
|
||||
*
|
||||
|
||||
|
|
@ -0,0 +1,10 @@
|
|||
Things I might work on:
|
||||
|
||||
* Fix vhost part of README
|
||||
* Support for config files
|
||||
* Standalone pre-forked (threaded?) version
|
||||
* Password-protected resources
|
||||
* Allow/Deny per IP/host
|
||||
* Automated feature testing script
|
||||
* SSL/TLS
|
||||
|
||||
|
|
@ -0,0 +1,67 @@
|
|||
/*
|
||||
* Convert any file into a C #define
|
||||
*
|
||||
* Yes, this would have been a perl one-liner, but I didn't want
|
||||
* to include compile-time dependency for perl...
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <unistd.h>
|
||||
|
||||
int main(int argc, char *argv[])
|
||||
{
|
||||
FILE *fp;
|
||||
char *source = NULL;
|
||||
char *name = NULL;
|
||||
int first = 1;
|
||||
int zero = 0;
|
||||
int c;
|
||||
int i;
|
||||
|
||||
/* Parse args */
|
||||
while ((c = getopt(argc, argv, "n:0")) != -1) {
|
||||
switch(c) {
|
||||
case 'n': name = optarg; break;
|
||||
case '0': zero = 1; break;
|
||||
}
|
||||
}
|
||||
|
||||
source = argv[optind];
|
||||
if (!name) name = source;
|
||||
|
||||
/* Check args */
|
||||
if (!source) {
|
||||
fprintf(stderr, "Usage: %s [-0] [-n <name>] <source>\n", argv[0]);
|
||||
return 1;
|
||||
}
|
||||
|
||||
/* Try to open the source file */
|
||||
if ((fp = fopen(source, "r")) == NULL) {
|
||||
perror("Couldn't open source file");
|
||||
return 1;
|
||||
}
|
||||
|
||||
/* Convert */
|
||||
printf("/* Automatically generated from %s */\n\n"
|
||||
"#define %s { \\\n", source, name);
|
||||
|
||||
do {
|
||||
for (i = 0; i < 16; i++) {
|
||||
if ((c = fgetc(fp)) == EOF) {
|
||||
if (zero--) c = '\0';
|
||||
else break;
|
||||
}
|
||||
|
||||
if (i == 0 && !first) printf(", \\\n");
|
||||
if (i > 0) printf(", ");
|
||||
|
||||
printf("0x%02x", c);
|
||||
first = 0;
|
||||
}
|
||||
} while (c != EOF);
|
||||
|
||||
printf("}\n\n");
|
||||
fclose(fp);
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,37 @@
|
|||
gophernicus (1.4) unstable; urgency=low
|
||||
|
||||
* New upstream release
|
||||
|
||||
-- Kim Holviala <kim@holviala.com> Sun, 02 Dec 2012 09:54:55 +0200
|
||||
|
||||
gophernicus (1.3) unstable; urgency=low
|
||||
|
||||
* New upstream release
|
||||
* Fixed one off-by-one
|
||||
|
||||
-- Kim Holviala <kim@holviala.com> Tue, 12 Jun 2012 13:07:46 +0300
|
||||
|
||||
gophernicus (1.2) unstable; urgency=low
|
||||
|
||||
* New upstream release
|
||||
|
||||
-- Kim Holviala <kim@holviala.com> Fri, 04 May 2012 22:05:01 +0300
|
||||
|
||||
gophernicus (1.1) unstable; urgency=low
|
||||
|
||||
* New upstream release
|
||||
* Security update, so upgrading is recommended
|
||||
|
||||
-- Kim Holviala <kim@holviala.com> Sat, 16 Oct 2010 08:54:13 +0300
|
||||
|
||||
gophernicus (1.0) unstable; urgency=low
|
||||
|
||||
* Initial debianized release
|
||||
* File logging by default, installs logrotate config
|
||||
* Pre-configures php support but only suggests php5-cli
|
||||
* Create a default gopher root
|
||||
* Installs an @reboot cron entry to snoop system type
|
||||
using a dmidecode script (which must be run as root)
|
||||
|
||||
-- Kim Holviala <kim@holviala.com> Mon, 27 Sep 2010 08:11:12 +0300
|
||||
|
||||
|
|
@ -0,0 +1 @@
|
|||
5
|
||||
|
|
@ -0,0 +1,16 @@
|
|||
Source: gophernicus
|
||||
Section: net
|
||||
Priority: extra
|
||||
Maintainer: Kim Holviala <kim@holviala.com>
|
||||
Build-Depends: debhelper (>= 5)
|
||||
Standards-Version: 3.7.3
|
||||
Homepage: gopher://gophernicus.org/1/software/gophernicus/server/
|
||||
|
||||
Package: gophernicus
|
||||
Architecture: any
|
||||
Depends: ${shlibs:Depends}, debconf, netbase, openbsd-inetd | inet-superserver
|
||||
Recommends: lsb-release
|
||||
Suggests: lynx, php5-cli
|
||||
Description: Modern full-featured gopher server for inetd
|
||||
Gophernicus is a modern full-featured (and hopefully) secure
|
||||
gopher daemon for inetd.
|
||||
|
|
@ -0,0 +1,22 @@
|
|||
Gophernicus - Copyright (c) 2009-2010 Kim Holviala <kim@holviala.com>
|
||||
All rights reserved.
|
||||
|
||||
Redistribution and use in source and binary forms, with or without
|
||||
modification, are permitted provided that the following conditions are met:
|
||||
* Redistributions of source code must retain the above copyright
|
||||
notice, this list of conditions and the following disclaimer.
|
||||
* Redistributions in binary form must reproduce the above copyright
|
||||
notice, this list of conditions and the following disclaimer in the
|
||||
documentation and/or other materials provided with the distribution.
|
||||
|
||||
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
|
||||
|
|
@ -0,0 +1,4 @@
|
|||
usr/sbin
|
||||
var/gopher
|
||||
var/log/gophernicus
|
||||
usr/lib/gophernicus/filters
|
||||
|
|
@ -0,0 +1,5 @@
|
|||
README
|
||||
README.Gophermap
|
||||
TODO
|
||||
INSTALL
|
||||
gophertag
|
||||
|
|
@ -0,0 +1,14 @@
|
|||
#!/bin/sh
|
||||
|
||||
# Source debconf library
|
||||
. /usr/share/debconf/confmodule
|
||||
|
||||
# Ask for a hostname
|
||||
db_input high gophernicus/fqdn || true
|
||||
db_go
|
||||
|
||||
# Clear old config on reconfigure
|
||||
if [ "$1" = "reconfigure" ]; then
|
||||
update-inetd --remove "#<off># gopher"
|
||||
fi
|
||||
|
||||
|
|
@ -0,0 +1,3 @@
|
|||
^\w{3} [ :0-9]{11} [._[:alnum:]-]+ in.gophernicus\[[0-9]+\]: request for "[^"]*" from [._[:alnum:]:-]+$
|
||||
^\w{3} [ :0-9]{11} [._[:alnum:]-]+ in.gophernicus\[[0-9]+\]: error "No such file or directory" for request "[^"]*" from [._[:alnum:]:-]+$
|
||||
^\w{3} [ :0-9]{11} [._[:alnum:]-]+ in.gophernicus\[[0-9]+\]: error "User not found" for request "/~[^"]*" from [._[:alnum:]:-]+$
|
||||
|
|
@ -0,0 +1,7 @@
|
|||
/var/log/gophernicus/server.log {
|
||||
rotate 6
|
||||
weekly
|
||||
compress
|
||||
missingok
|
||||
notifempty
|
||||
}
|
||||
|
|
@ -0,0 +1,4 @@
|
|||
Template: gophernicus/fqdn
|
||||
Type: string
|
||||
Default:
|
||||
Description: Fully-qualified hostname for the gopher server:
|
||||
|
|
@ -0,0 +1,37 @@
|
|||
#!/bin/sh
|
||||
|
||||
#DEBHELPER#
|
||||
|
||||
# Source debconf library.
|
||||
. /usr/share/debconf/confmodule
|
||||
|
||||
# Configuration
|
||||
HOSTNAME="`hostname`"
|
||||
ROOT=/var/gopher
|
||||
PACKAGE=gophernicus
|
||||
LOGDIR=/var/log/$PACKAGE
|
||||
LIBDIR=/usr/lib/$PACKAGE
|
||||
BINARY=in.gophernicus
|
||||
USER=nobody
|
||||
|
||||
# Get hostname from debconf
|
||||
db_get gophernicus/fqdn
|
||||
if [ "$RET" ]; then
|
||||
HOSTNAME="`echo $RET | tr -cd 'A-Za-z0-9.-'`"
|
||||
fi
|
||||
|
||||
# Generate inetd service
|
||||
SERVICE="gopher\t\tstream\ttcp\tnowait\t$USER\t/usr/sbin/$BINARY\t$BINARY -h $HOSTNAME -l $LOGDIR/server.log -f /usr/lib/$PACKAGE/filters"
|
||||
|
||||
# Configure gophernicus
|
||||
if [ "$1" = "configure" ]; then
|
||||
if [ ! -f "$ROOT/gophermap" ]; then
|
||||
cp $LIBDIR/gophermap $ROOT/
|
||||
fi
|
||||
|
||||
chown $USER.adm $LOGDIR
|
||||
chmod 0750 $LOGDIR
|
||||
|
||||
update-inetd --add "$SERVICE"
|
||||
fi
|
||||
|
||||
|
|
@ -0,0 +1,8 @@
|
|||
#!/bin/sh
|
||||
|
||||
if [ "$1" = "purge" ]; then
|
||||
update-inetd --remove "#<off># gopher"
|
||||
fi
|
||||
|
||||
#DEBHELPER#
|
||||
|
||||
|
|
@ -0,0 +1,6 @@
|
|||
#!/bin/sh
|
||||
|
||||
update-inetd --disable gopher
|
||||
|
||||
#DEBHELPER#
|
||||
|
||||
|
|
@ -0,0 +1,85 @@
|
|||
#!/usr/bin/make -f
|
||||
# -*- makefile -*-
|
||||
# Gophernicus debian/rules that uses debhelper.
|
||||
# This file was originally written by Joey Hess and Craig Small.
|
||||
# As a special exception, when this file is copied by dh-make into a
|
||||
# dh-make output file, you may use that output file without restriction.
|
||||
# This special exception was added by Craig Small in version 0.37 of dh-make.
|
||||
|
||||
# Uncomment this to turn on verbose mode.
|
||||
#export DH_VERBOSE=1
|
||||
|
||||
# Installation directory
|
||||
DEST=$(CURDIR)/debian/gophernicus
|
||||
|
||||
configure:
|
||||
|
||||
build: build-stamp
|
||||
|
||||
build-stamp:
|
||||
dh_testdir
|
||||
|
||||
$(MAKE)
|
||||
|
||||
touch $@
|
||||
|
||||
clean:
|
||||
dh_testdir
|
||||
dh_testroot
|
||||
rm -f build-stamp
|
||||
|
||||
$(MAKE) clean-build
|
||||
|
||||
dh_clean
|
||||
|
||||
install: build
|
||||
dh_testdir
|
||||
dh_testroot
|
||||
dh_clean -k
|
||||
dh_installdirs
|
||||
|
||||
# Add here commands to install the package into debian/gophernicus
|
||||
$(MAKE) DESTDIR=$(DEST)/usr install-files
|
||||
rm -rf $(DEST)/tmp
|
||||
ln -s /usr/share/doc/gophernicus/ $(DEST)/var/gopher/docs
|
||||
ln -s /usr/bin/php5 $(DEST)/usr/lib/gophernicus/filters/php
|
||||
cp gophermap $(DEST)/usr/lib/gophernicus/
|
||||
|
||||
# Build architecture-independent files here.
|
||||
binary-indep: build install
|
||||
# We have nothing to do by default.
|
||||
|
||||
# Build architecture-dependent files here.
|
||||
binary-arch: build install
|
||||
dh_testdir
|
||||
dh_testroot
|
||||
dh_installchangelogs ChangeLog
|
||||
dh_installdocs
|
||||
# dh_installexamples
|
||||
# dh_install
|
||||
# dh_installmenu
|
||||
dh_installdebconf
|
||||
dh_installlogrotate
|
||||
dh_installlogcheck
|
||||
# dh_installemacsen
|
||||
# dh_installpam
|
||||
# dh_installmime
|
||||
# dh_python
|
||||
# dh_installinit
|
||||
# dh_installcron
|
||||
# dh_installinfo
|
||||
# dh_installman
|
||||
dh_link
|
||||
dh_strip
|
||||
dh_compress
|
||||
dh_fixperms
|
||||
# dh_perl
|
||||
# dh_makeshlibs
|
||||
dh_installdeb
|
||||
dh_shlibdeps
|
||||
dh_gencontrol
|
||||
dh_md5sums
|
||||
dh_builddeb
|
||||
|
||||
binary: binary-indep binary-arch
|
||||
.PHONY: build clean binary-indep binary-arch binary install configure
|
||||
|
|
@ -0,0 +1,25 @@
|
|||
#!/bin/sh
|
||||
|
||||
##
|
||||
## A simple visitor counter to use with gophermaps
|
||||
##
|
||||
## Usage: counter.sh <pre message> <post message>
|
||||
##
|
||||
|
||||
# Figure out a safe file to keep our counter
|
||||
HASH=`echo "$SELECTOR" | md5sum | cut -d" " -f1`
|
||||
FILE=/var/tmp/gopher-counter-$HASH
|
||||
|
||||
# Get count and the previous visitors IP address
|
||||
COUNT="`cut -d' ' -f1 $FILE`"
|
||||
OLD_ADDR="`cut -d' ' -f2 $FILE`"
|
||||
|
||||
# Increase counter only if the user is new
|
||||
if [ "$OLD_ADDR" != "$REMOTE_ADDR" ]; then
|
||||
COUNT=$(( COUNT + 1 ))
|
||||
echo "$COUNT $REMOTE_ADDR" > $FILE
|
||||
fi
|
||||
|
||||
# Output counter message
|
||||
echo "$1$COUNT$2"
|
||||
|
||||
|
|
@ -0,0 +1,402 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Send a binary file to the client
|
||||
*/
|
||||
void send_binary_file(state *st)
|
||||
{
|
||||
/* Faster sendfile() version */
|
||||
#ifdef HAVE_SENDFILE
|
||||
int fd;
|
||||
off_t offset = 0;
|
||||
|
||||
if (st->debug) syslog(LOG_INFO, "outputting binary file \"%s\"", st->req_realpath);
|
||||
|
||||
if ((fd = open(st->req_realpath, O_RDONLY)) == ERROR) return;
|
||||
sendfile(1, fd, &offset, st->req_filesize);
|
||||
close(fd);
|
||||
|
||||
/* More compatible POSIX fread()/fwrite() version */
|
||||
#else
|
||||
FILE *fp;
|
||||
char buf[BUFSIZE];
|
||||
int bytes;
|
||||
|
||||
if (st->debug) syslog(LOG_INFO, "outputting binary file \"%s\"", st->req_realpath);
|
||||
|
||||
if ((fp = fopen(st->req_realpath , "r")) == NULL) return;
|
||||
while ((bytes = fread(buf, 1, sizeof(buf), fp)) > 0)
|
||||
fwrite(buf, bytes, 1, stdout);
|
||||
fclose(fp);
|
||||
#endif
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Send a text file to the client
|
||||
*/
|
||||
void send_text_file(state *st)
|
||||
{
|
||||
FILE *fp;
|
||||
char in[BUFSIZE];
|
||||
char out[BUFSIZE];
|
||||
int line;
|
||||
|
||||
if (st->debug) syslog(LOG_INFO, "outputting text file \"%s\"", st->req_realpath);
|
||||
if ((fp = fopen(st->req_realpath , "r")) == NULL) return;
|
||||
|
||||
/* Loop through the file line by line */
|
||||
line = 0;
|
||||
|
||||
while (fgets(in, sizeof(in), fp)) {
|
||||
|
||||
/* Covert to output charset & print */
|
||||
if (st->opt_iconv) sstrniconv(st->out_charset, out, in);
|
||||
else sstrlcpy(out, in);
|
||||
|
||||
chomp(out);
|
||||
|
||||
#ifdef ENABLE_STRICT_RFC1436
|
||||
if (strcmp(out, ".") == MATCH) printf(".." CRLF);
|
||||
else
|
||||
#endif
|
||||
printf("%s" CRLF, out);
|
||||
line++;
|
||||
}
|
||||
|
||||
#ifdef ENABLE_STRICT_RFC1436
|
||||
printf("." CRLF);
|
||||
#endif
|
||||
fclose(fp);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Print hURL redirect page
|
||||
*/
|
||||
void url_redirect(state *st)
|
||||
{
|
||||
char dest[BUFSIZE];
|
||||
char *c;
|
||||
|
||||
/* Basic security checking */
|
||||
sstrlcpy(dest, st->req_selector + 4);
|
||||
|
||||
if (sstrncmp(dest, "http://") != MATCH &&
|
||||
sstrncmp(dest, "ftp://") != MATCH &&
|
||||
sstrncmp(dest, "mailto:") != MATCH)
|
||||
die(st, ERR_ACCESS, "Refusing to HTTP redirect unsafe protocols");
|
||||
|
||||
if ((c = strchr(dest, '"'))) *c = '\0';
|
||||
if ((c = strchr(dest, '?'))) *c = '\0';
|
||||
|
||||
/* Log the redirect */
|
||||
if (st->opt_syslog) {
|
||||
syslog(LOG_INFO, "request for \"gopher://%s:%i/h%s\" from %s",
|
||||
st->server_host,
|
||||
st->server_port,
|
||||
st->req_selector,
|
||||
st->req_remote_addr);
|
||||
}
|
||||
log_combined(st, HTTP_OK);
|
||||
|
||||
/* Output HTML */
|
||||
printf("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">\n"
|
||||
"<HTML>\n<HEAD>\n"
|
||||
" <META HTTP-EQUIV=\"Refresh\" content=\"1;URL=%1$s\">\n"
|
||||
" <META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html;charset=iso-8859-1\">\n"
|
||||
" <TITLE>URL Redirect page</TITLE>\n"
|
||||
"</HEAD>\n<BODY>\n"
|
||||
"<STRONG>Redirecting to <A HREF=\"%1$s\">%1$s</A></STRONG>\n"
|
||||
"<PRE>\n", dest);
|
||||
footer(st);
|
||||
printf("</PRE>\n</BODY>\n</HTML>\n");
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Handle /server-status
|
||||
*/
|
||||
#ifdef HAVE_SHMEM
|
||||
void server_status(state *st, shm_state *shm, int shmid)
|
||||
{
|
||||
struct shmid_ds shm_ds;
|
||||
time_t now;
|
||||
time_t uptime;
|
||||
int sessions;
|
||||
int i;
|
||||
|
||||
/* Log the request */
|
||||
if (st->opt_syslog) {
|
||||
syslog(LOG_INFO, "request for \"gopher://%s:%i/0" SERVER_STATUS "\" from %s",
|
||||
st->server_host,
|
||||
st->server_port,
|
||||
st->req_remote_addr);
|
||||
}
|
||||
log_combined(st, HTTP_OK);
|
||||
|
||||
/* Quit if shared memory isn't initialized yet */
|
||||
if (!shm) return;
|
||||
|
||||
/* Update counters */
|
||||
shm->hits++;
|
||||
shm->kbytes += 1;
|
||||
|
||||
/* Get server uptime */
|
||||
now = time(NULL);
|
||||
uptime = (now - shm->start_time) + 1;
|
||||
|
||||
/* Get shared memory info */
|
||||
shmctl(shmid, IPC_STAT, &shm_ds);
|
||||
|
||||
/* Print statistics */
|
||||
printf("Total Accesses: %li" CRLF
|
||||
"Total kBytes: %li" CRLF
|
||||
"Uptime: %i" CRLF
|
||||
"ReqPerSec: %.3f" CRLF
|
||||
"BytesPerSec: %li" CRLF
|
||||
"BytesPerReq: %li" CRLF
|
||||
"BusyServers: %i" CRLF
|
||||
"IdleServers: 0" CRLF
|
||||
"CPULoad: %.2f" CRLF,
|
||||
shm->hits,
|
||||
shm->kbytes,
|
||||
(int) uptime,
|
||||
(float) shm->hits / (float) uptime,
|
||||
shm->kbytes * 1024 / (int) uptime,
|
||||
shm->kbytes * 1024 / (shm->hits + 1),
|
||||
(int) shm_ds.shm_nattch,
|
||||
loadavg());
|
||||
|
||||
/* Print active sessions */
|
||||
sessions = 0;
|
||||
|
||||
for (i = 0; i < SHM_SESSIONS; i++) {
|
||||
if ((now - shm->session[i].req_atime) < st->session_timeout) {
|
||||
sessions++;
|
||||
|
||||
printf("Session: %-4i %-40s %-4li %-7li gopher://%s:%i/%c%s" CRLF,
|
||||
(int) (now - shm->session[i].req_atime),
|
||||
shm->session[i].req_remote_addr,
|
||||
shm->session[i].hits,
|
||||
shm->session[i].kbytes,
|
||||
shm->session[i].server_host,
|
||||
shm->session[i].server_port,
|
||||
shm->session[i].req_filetype,
|
||||
shm->session[i].req_selector);
|
||||
}
|
||||
}
|
||||
|
||||
printf("Total Sessions: %i" CRLF, sessions);
|
||||
}
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* Handle /caps.txt
|
||||
*/
|
||||
void caps_txt(state *st, shm_state *shm)
|
||||
{
|
||||
/* Log the request */
|
||||
if (st->opt_syslog) {
|
||||
syslog(LOG_INFO, "request for \"gopher://%s:%i/0" CAPS_TXT "\" from %s",
|
||||
st->server_host,
|
||||
st->server_port,
|
||||
st->req_remote_addr);
|
||||
}
|
||||
log_combined(st, HTTP_OK);
|
||||
|
||||
/* Update counters */
|
||||
#ifdef HAVE_SHMEM
|
||||
if (shm) {
|
||||
shm->hits++;
|
||||
shm->kbytes += 1;
|
||||
|
||||
/* Update session data */
|
||||
st->req_filesize += 1024;
|
||||
update_shm_session(st, shm);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Standard caps.txt stuff */
|
||||
printf("CAPS" CRLF
|
||||
CRLF
|
||||
"##" CRLF
|
||||
"## This is an automatically generated caps file." CRLF
|
||||
"##" CRLF
|
||||
CRLF
|
||||
"CapsVersion=1" CRLF
|
||||
"ExpireCapsAfter=%i" CRLF
|
||||
CRLF
|
||||
"PathDelimeter=/" CRLF
|
||||
"PathIdentity=." CRLF
|
||||
"PathParent=.." CRLF
|
||||
"PathParentDouble=FALSE" CRLF
|
||||
"PathKeepPreDelimeter=FALSE" CRLF
|
||||
CRLF
|
||||
"ServerSoftware=" SERVER_SOFTWARE CRLF
|
||||
"ServerSoftwareVersion=" VERSION CRLF
|
||||
"ServerArchitecture=%s" CRLF,
|
||||
st->session_timeout,
|
||||
st->server_platform);
|
||||
|
||||
/* Optional keys */
|
||||
if (*st->server_description)
|
||||
printf("ServerDescription=%s" CRLF, st->server_description);
|
||||
if (*st->server_location)
|
||||
printf("ServerGeolocationString=%s" CRLF, st->server_location);
|
||||
if (*st->server_admin)
|
||||
printf("ServerAdmin=%s" CRLF, st->server_admin);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Setup environment variables as per the CGI spec
|
||||
*/
|
||||
void setenv_cgi(state *st, char *script)
|
||||
{
|
||||
char buf[BUFSIZE];
|
||||
|
||||
/* Security */
|
||||
setenv("PATH", SAFE_PATH, 1);
|
||||
|
||||
/* Set up the environment as per CGI spec */
|
||||
setenv("GATEWAY_INTERFACE", "CGI/1.1", 1);
|
||||
setenv("CONTENT_LENGTH", "0", 1);
|
||||
setenv("QUERY_STRING", st->req_query_string, 1);
|
||||
snprintf(buf, sizeof(buf), SERVER_SOFTWARE_FULL, st->server_platform);
|
||||
setenv("SERVER_SOFTWARE", buf, 1);
|
||||
setenv("SERVER_ARCH", st->server_platform, 1);
|
||||
setenv("SERVER_DESCRIPTION", st->server_description, 1);
|
||||
snprintf(buf, sizeof(buf), SERVER_SOFTWARE "/" VERSION);
|
||||
setenv("SERVER_VERSION", buf, 1);
|
||||
|
||||
if (st->req_protocol == PROTO_HTTP)
|
||||
setenv("SERVER_PROTOCOL", "HTTP/0.9", 1);
|
||||
else
|
||||
setenv("SERVER_PROTOCOL", "RFC1436", 1);
|
||||
|
||||
setenv("SERVER_NAME", st->server_host, 1);
|
||||
snprintf(buf, sizeof(buf), "%i", st->server_port);
|
||||
setenv("SERVER_PORT", buf, 1);
|
||||
setenv("REQUEST_METHOD", "GET", 1);
|
||||
setenv("DOCUMENT_ROOT", st->server_root, 1);
|
||||
setenv("SCRIPT_NAME", st->req_selector, 1);
|
||||
setenv("SCRIPT_FILENAME", script, 1);
|
||||
setenv("LOCAL_ADDR", st->req_local_addr, 1);
|
||||
setenv("REMOTE_ADDR", st->req_remote_addr, 1);
|
||||
setenv("HTTP_REFERER", st->req_referrer, 1);
|
||||
setenv("HTTP_ACCEPT_CHARSET", strcharset(st->out_charset), 1);
|
||||
|
||||
/* Gophernicus extras */
|
||||
snprintf(buf, sizeof(buf), "%c", st->req_filetype);
|
||||
setenv("GOPHER_FILETYPE", buf, 1);
|
||||
setenv("GOPHER_CHARSET", strcharset(st->out_charset), 1);
|
||||
setenv("GOPHER_REFERER", st->req_referrer, 1);
|
||||
snprintf(buf, sizeof(buf), "%i", st->out_width);
|
||||
setenv("COLUMNS", buf, 1);
|
||||
|
||||
/* Bucktooth extras */
|
||||
if (*st->req_query_string) {
|
||||
snprintf(buf, sizeof(buf), "%s?%s",
|
||||
st->req_selector, st->req_query_string);
|
||||
setenv("SELECTOR", buf, 1);
|
||||
}
|
||||
else setenv("SELECTOR", st->req_selector, 1);
|
||||
|
||||
setenv("SERVER_HOST", st->server_host, 1);
|
||||
setenv("REQUEST", st->req_selector, 1);
|
||||
setenv("SEARCHREQUEST", st->req_query_string, 1);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Execute a CGI script
|
||||
*/
|
||||
void run_cgi(state *st, char *script, char *arg)
|
||||
{
|
||||
/* Setup environment & execute the binary */
|
||||
if (st->debug) syslog(LOG_INFO, "executing script \"%s\"", script);
|
||||
|
||||
setenv_cgi(st, script);
|
||||
execl(script, script, arg, NULL);
|
||||
|
||||
/* Didn't work - die */
|
||||
die(st, ERR_ACCESS, NULL);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Handle file selectors
|
||||
*/
|
||||
void gopher_file(state *st)
|
||||
{
|
||||
struct stat file;
|
||||
char buf[BUFSIZE];
|
||||
char *c;
|
||||
|
||||
/* Refuse to serve out gophermaps/tags */
|
||||
if ((c = strrchr(st->req_realpath, '/'))) c++;
|
||||
else c = st->req_realpath;
|
||||
|
||||
if (strcmp(c, st->map_file) == MATCH)
|
||||
die(st, ERR_ACCESS, "Refusing to serve out a gophermap file");
|
||||
if (strcmp(c, st->tag_file) == MATCH)
|
||||
die(st, ERR_ACCESS, "Refusing to serve out a gophertag file");
|
||||
|
||||
/* Check for & run CGI and query scripts */
|
||||
if (strstr(st->req_realpath, st->cgi_file) || st->req_filetype == TYPE_QUERY)
|
||||
run_cgi(st, st->req_realpath, NULL);
|
||||
|
||||
/* Check for a file suffix filter */
|
||||
if (*st->filter_dir && (c = strrchr(st->req_realpath, '.'))) {
|
||||
snprintf(buf, sizeof(buf), "%s/%s", st->filter_dir, c + 1);
|
||||
|
||||
/* Filter file through the script */
|
||||
if (stat(buf, &file) == OK && (file.st_mode & S_IXOTH))
|
||||
run_cgi(st, buf, st->req_realpath);
|
||||
}
|
||||
|
||||
/* Check for a filetype filter */
|
||||
if (*st->filter_dir) {
|
||||
snprintf(buf, sizeof(buf), "%s/%c", st->filter_dir, st->req_filetype);
|
||||
|
||||
/* Filter file through the script */
|
||||
if (stat(buf, &file) == OK && (file.st_mode & S_IXOTH))
|
||||
run_cgi(st, buf, st->req_realpath);
|
||||
}
|
||||
|
||||
/* Output regular files */
|
||||
if (st->req_filetype == TYPE_TEXT || st->req_filetype == TYPE_MIME)
|
||||
send_text_file(st);
|
||||
else
|
||||
send_binary_file(st);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,36 @@
|
|||
!Welcome to Gophernicus!
|
||||
#
|
||||
# $ figlet -f chunky Gophernicus
|
||||
#
|
||||
_______ __ __
|
||||
| __|.-----.-----.| |--.-----.----.-----.|__|.----.--.--.-----.
|
||||
| | || _ | _ || | -__| _| || || __| | |__ --|
|
||||
|_______||_____| __||__|__|_____|__| |__|__||__||____|_____|_____|
|
||||
|__|
|
||||
#
|
||||
# Shamelessly lifted from Apache 1.3...
|
||||
#
|
||||
If you can see this, it means that the installation of Gophernicus
|
||||
on this system was successful. You may now add content to this
|
||||
directory and replace this page.
|
||||
|
||||
#
|
||||
# Real-time configuration output (WOO!)
|
||||
#
|
||||
Generic information:
|
||||
=echo " current time...: `date`"
|
||||
=echo " your ip address: $REMOTE_ADDR"
|
||||
=echo " server uptime..: `uptime | sed 's/.*up \([^,]*\), .*/\1/' `"
|
||||
=echo " server version.: $SERVER_VERSION"
|
||||
=echo " server platform: $SERVER_ARCH"
|
||||
=echo " description....: $SERVER_DESCRIPTION"
|
||||
|
||||
Server configuration:
|
||||
=echo " config file....: `for FILE in /Library/LaunchDaemons/org.gophernicus.server.plist /boot/common/settings/network/services /etc/xinetd.d/gophernicus /etc/inetd.conf; do if [ -f $FILE ]; then echo $FILE; break; fi; done`"
|
||||
=echo " server hostname: $SERVER_HOST"
|
||||
=echo " root directory.: $DOCUMENT_ROOT"
|
||||
=echo " running as user: `whoami`"
|
||||
=echo " output charset.: $GOPHER_CHARSET"
|
||||
=echo " output width...: $COLUMNS characters"
|
||||
|
||||
*
|
||||
|
|
@ -0,0 +1,735 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Print gopher menu line
|
||||
*/
|
||||
void info(state *st, char *str, char type)
|
||||
{
|
||||
char buf[BUFSIZE];
|
||||
char selector[16];
|
||||
|
||||
/* Convert string to output charset */
|
||||
if (st->opt_iconv) sstrniconv(st->out_charset, buf, str);
|
||||
else sstrlcpy(buf, str);
|
||||
|
||||
/* Handle gopher title resources */
|
||||
strclear(selector);
|
||||
if (type == TYPE_TITLE) {
|
||||
sstrlcpy(selector, "TITLE");
|
||||
type = TYPE_INFO;
|
||||
}
|
||||
|
||||
/* Output info line */
|
||||
strcut(buf, st->out_width);
|
||||
printf("%c%s\t%s\t%s" CRLF,
|
||||
type, buf, selector, DUMMY_HOST);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Print footer
|
||||
*/
|
||||
void footer(state *st)
|
||||
{
|
||||
char line[BUFSIZE];
|
||||
char buf[BUFSIZE];
|
||||
char msg[BUFSIZE];
|
||||
|
||||
if (!st->opt_footer) {
|
||||
#ifndef ENABLE_STRICT_RFC1436
|
||||
if (st->req_filetype == TYPE_MENU || st->req_filetype == TYPE_QUERY)
|
||||
#endif
|
||||
printf("." CRLF);
|
||||
return;
|
||||
}
|
||||
|
||||
/* Create horizontal line */
|
||||
strrepeat(line, '_', st->out_width);
|
||||
|
||||
/* Create right-aligned footer message */
|
||||
snprintf(buf, sizeof(buf), FOOTER_FORMAT, st->server_platform);
|
||||
snprintf(msg, sizeof(msg), "%*s", st->out_width - 1, buf);
|
||||
|
||||
/* Menu footer? */
|
||||
if (st->req_filetype == TYPE_MENU || st->req_filetype == TYPE_QUERY) {
|
||||
info(st, line, TYPE_INFO);
|
||||
info(st, msg, TYPE_INFO);
|
||||
printf("." CRLF);
|
||||
}
|
||||
|
||||
/* Plain text footer */
|
||||
else {
|
||||
printf("%s" CRLF, line);
|
||||
printf("%s" CRLF, msg);
|
||||
#ifdef ENABLE_STRICT_RFC1436
|
||||
printf("." CRLF);
|
||||
#endif
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Print error message & exit
|
||||
*/
|
||||
void die(state *st, char *message, char *description)
|
||||
{
|
||||
int en = errno;
|
||||
static const char error_gif[] = ERROR_GIF;
|
||||
|
||||
/* Handle NULL description */
|
||||
if (description == NULL) description = strerror(en);
|
||||
|
||||
/* Log the error */
|
||||
if (st->opt_syslog) {
|
||||
syslog(LOG_ERR, "error \"%s\" for request \"%s\" from %s",
|
||||
description, st->req_selector, st->req_remote_addr);
|
||||
}
|
||||
log_combined(st, HTTP_404);
|
||||
|
||||
/* Handle menu errors */
|
||||
if (st->req_filetype == TYPE_MENU || st->req_filetype == TYPE_QUERY) {
|
||||
printf("3" ERROR_PREFIX "%s\tTITLE\t" DUMMY_HOST CRLF, message);
|
||||
footer(st);
|
||||
}
|
||||
|
||||
/* Handle image errors */
|
||||
else if (st->req_filetype == TYPE_GIF || st->req_filetype == TYPE_IMAGE) {
|
||||
fwrite(error_gif, sizeof(error_gif), 1, stdout);
|
||||
}
|
||||
|
||||
/* Handle HTML errors */
|
||||
else if (st->req_filetype == TYPE_HTML) {
|
||||
printf("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">\n"
|
||||
"<HTML>\n<HEAD>\n"
|
||||
" <META HTTP-EQUIV=\"Content-Type\" CONTENT=\"text/html;charset=iso-8859-1\">\n"
|
||||
" <TITLE>" ERROR_PREFIX "%1$s</TITLE>\n"
|
||||
"</HEAD>\n<BODY>\n"
|
||||
"<STRONG>" ERROR_PREFIX "%1$s</STRONG>\n"
|
||||
"<PRE>\n", message);
|
||||
footer(st);
|
||||
printf("</PRE>\n</BODY>\n</HTML>\n");
|
||||
}
|
||||
|
||||
/* Use plain text error for other filetypes */
|
||||
else {
|
||||
printf(ERROR_PREFIX "%s" CRLF, message);
|
||||
footer(st);
|
||||
}
|
||||
|
||||
/* Quit */
|
||||
exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Apache-compatible combined logging
|
||||
*/
|
||||
void log_combined(state *st, int status)
|
||||
{
|
||||
FILE *fp;
|
||||
struct tm *ltime;
|
||||
char timestr[64];
|
||||
time_t now;
|
||||
|
||||
/* Try to open the logfile for appending */
|
||||
if (!*st->log_file) return;
|
||||
if ((fp = fopen(st->log_file , "a")) == NULL) return;
|
||||
|
||||
/* Format time */
|
||||
now = time(NULL);
|
||||
ltime = localtime(&now);
|
||||
strftime(timestr, sizeof(timestr), HTTP_DATE, ltime);
|
||||
|
||||
/* Generate log entry */
|
||||
fprintf(fp, "%s %s:%i - [%s] \"GET %c%s HTTP/1.0\" %i %li \"%s\" \"" HTTP_USERAGENT "\"\n",
|
||||
st->req_remote_addr,
|
||||
st->server_host,
|
||||
st->server_port,
|
||||
timestr,
|
||||
st->req_filetype,
|
||||
st->req_selector,
|
||||
status,
|
||||
(long) st->req_filesize,
|
||||
st->req_referrer);
|
||||
fclose(fp);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Convert gopher selector to an absolute path
|
||||
*/
|
||||
void selector_to_path(state *st)
|
||||
{
|
||||
DIR *dp;
|
||||
struct dirent *dir;
|
||||
struct stat file;
|
||||
#ifdef HAVE_PASSWD
|
||||
struct passwd *pwd;
|
||||
char *path = EMPTY;
|
||||
char *c;
|
||||
#endif
|
||||
char buf[BUFSIZE];
|
||||
int i;
|
||||
|
||||
/* Handle selector rewriting */
|
||||
for (i = 0; i < st->rewrite_count; i++) {
|
||||
|
||||
/* Match found? */
|
||||
if (strstr(st->req_selector, st->rewrite[i].match) == st->req_selector) {
|
||||
|
||||
/* Replace match with a new string */
|
||||
snprintf(buf, sizeof(buf), "%s%s",
|
||||
st->rewrite[i].replace,
|
||||
st->req_selector + strlen(st->rewrite[i].match));
|
||||
|
||||
if (st->debug) {
|
||||
syslog(LOG_INFO, "rewriting selector \"%s\" -> \"%s\"",
|
||||
st->req_selector, buf);
|
||||
}
|
||||
|
||||
sstrlcpy(st->req_selector, buf);
|
||||
}
|
||||
}
|
||||
|
||||
#ifdef HAVE_PASSWD
|
||||
/* Virtual userdir (~user -> /home/user/public_gopher)? */
|
||||
if (*(st->user_dir) && sstrncmp(st->req_selector, "/~") == MATCH) {
|
||||
|
||||
/* Parse userdir login name & path */;
|
||||
sstrlcpy(buf, st->req_selector + 2);
|
||||
if ((c = strchr(buf, '/'))) {
|
||||
*c = '\0';
|
||||
path = c + 1;
|
||||
}
|
||||
|
||||
/* Check user validity */
|
||||
if ((pwd = getpwnam(buf)) == NULL)
|
||||
die(st, ERR_NOTFOUND, "User not found");
|
||||
if (pwd->pw_uid < PASSWD_MIN_UID)
|
||||
die(st, ERR_NOTFOUND, "User found but UID too low");
|
||||
|
||||
/* Generate absolute path to users own gopher root */
|
||||
snprintf(st->req_realpath, sizeof(st->req_realpath),
|
||||
"%s/%s/%s", pwd->pw_dir, st->user_dir, path);
|
||||
|
||||
/* Check ~public_gopher access rights */
|
||||
if (stat(st->req_realpath, &file) == ERROR)
|
||||
die(st, ERR_NOTFOUND, NULL);
|
||||
if ((file.st_mode & S_IROTH) == 0)
|
||||
die(st, ERR_ACCESS, "~/public_gopher not world-readable");
|
||||
if (file.st_uid != pwd->pw_uid)
|
||||
die(st, ERR_ACCESS, "~/ and ~/public_gopher owned by different users");
|
||||
|
||||
/* Userdirs always come from the default vhost */
|
||||
if (st->opt_vhost)
|
||||
sstrlcpy(st->server_host, st->server_host_default);
|
||||
return;
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Virtual hosting */
|
||||
if (st->opt_vhost) {
|
||||
|
||||
/* Try looking for the selector from the current vhost */
|
||||
snprintf(st->req_realpath, sizeof(st->req_realpath), "%s/%s%s",
|
||||
st->server_root, st->server_host, st->req_selector);
|
||||
if (stat(st->req_realpath, &file) == OK) return;
|
||||
|
||||
/* Loop through all vhosts looking for the selector */
|
||||
if ((dp = opendir(st->server_root)) == NULL) die(st, ERR_NOTFOUND, NULL);
|
||||
while ((dir = readdir(dp))) {
|
||||
|
||||
/* Skip .hidden dirs and . & .. */
|
||||
if (dir->d_name[0] == '.') continue;
|
||||
|
||||
/* Special case - skip lost+found (don't ask) */
|
||||
if (sstrncmp(dir->d_name, "lost+found") == MATCH) continue;
|
||||
|
||||
/* Generate path to the found vhost */
|
||||
snprintf(st->req_realpath, sizeof(st->req_realpath), "%s/%s%s",
|
||||
st->server_root, dir->d_name, st->req_selector);
|
||||
|
||||
/* Did we find the selector under this vhost? */
|
||||
if (stat(st->req_realpath, &file) == OK) {
|
||||
|
||||
/* Virtual host found - update state & return */
|
||||
sstrlcpy(st->server_host, dir->d_name);
|
||||
return;
|
||||
}
|
||||
}
|
||||
closedir(dp);
|
||||
}
|
||||
|
||||
/* Handle normal selectors */
|
||||
snprintf(st->req_realpath, sizeof(st->req_realpath),
|
||||
"%s%s", st->server_root, st->req_selector);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Get local IP address
|
||||
*/
|
||||
char *get_local_address(void)
|
||||
{
|
||||
#ifdef HAVE_IPv4
|
||||
struct sockaddr_in addr;
|
||||
socklen_t addrsize = sizeof(addr);
|
||||
#endif
|
||||
#ifdef HAVE_IPv6
|
||||
struct sockaddr_in6 addr6;
|
||||
socklen_t addr6size = sizeof(addr6);
|
||||
static char address[INET6_ADDRSTRLEN];
|
||||
#endif
|
||||
char *c;
|
||||
|
||||
/* Try IPv4 first */
|
||||
#ifdef HAVE_IPv4
|
||||
if (getsockname(0, (struct sockaddr *) &addr, &addrsize) == OK) {
|
||||
c = inet_ntoa(addr.sin_addr);
|
||||
if (strlen(c) > 0 && *c != '0') return c;
|
||||
}
|
||||
#endif
|
||||
|
||||
/* IPv4 didn't work - try IPv6 */
|
||||
#ifdef HAVE_IPv6
|
||||
if (getsockname(0, (struct sockaddr *) &addr6, &addr6size) == OK) {
|
||||
if (inet_ntop(AF_INET6, &addr6.sin6_addr, address, sizeof(address))) {
|
||||
|
||||
/* Strip ::ffff: IPv4-in-IPv6 prefix */
|
||||
if (sstrncmp(address, "::ffff:") == MATCH) return (address + 7);
|
||||
else return address;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Nothing works... I'm out of ideas */
|
||||
return DEFAULT_ADDR;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Get remote peer IP address
|
||||
*/
|
||||
char *get_peer_address(void)
|
||||
{
|
||||
#ifdef HAVE_IPv4
|
||||
struct sockaddr_in addr;
|
||||
socklen_t addrsize = sizeof(addr);
|
||||
#endif
|
||||
#ifdef HAVE_IPv6
|
||||
struct sockaddr_in6 addr6;
|
||||
socklen_t addr6size = sizeof(addr6);
|
||||
static char address[INET6_ADDRSTRLEN];
|
||||
#endif
|
||||
char *c;
|
||||
|
||||
/* Are we a CGI script? */
|
||||
if ((c = getenv("REMOTE_ADDR"))) return c;
|
||||
/* if ((c = getenv("REMOTE_HOST"))) return c; */
|
||||
|
||||
/* Try IPv4 first */
|
||||
#ifdef HAVE_IPv4
|
||||
if (getpeername(0, (struct sockaddr *) &addr, &addrsize) == OK) {
|
||||
c = inet_ntoa(addr.sin_addr);
|
||||
if (strlen(c) > 0 && *c != '0') return c;
|
||||
}
|
||||
#endif
|
||||
|
||||
/* IPv4 didn't work - try IPv6 */
|
||||
#ifdef HAVE_IPv6
|
||||
if (getpeername(0, (struct sockaddr *) &addr6, &addr6size) == OK) {
|
||||
if (inet_ntop(AF_INET6, &addr6.sin6_addr, address, sizeof(address))) {
|
||||
|
||||
/* Strip ::ffff: IPv4-in-IPv6 prefix */
|
||||
if (sstrncmp(address, "::ffff:") == MATCH) return (address + 7);
|
||||
else return address;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Nothing works... I'm out of ideas */
|
||||
return DEFAULT_ADDR;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Initialize state struct to default/empty values
|
||||
*/
|
||||
void init_state(state *st)
|
||||
{
|
||||
static const char *filetypes[] = { FILETYPES };
|
||||
char buf[BUFSIZE];
|
||||
char *c;
|
||||
int i;
|
||||
|
||||
/* Request */
|
||||
strclear(st->req_selector);
|
||||
strclear(st->req_realpath);
|
||||
strclear(st->req_query_string);
|
||||
strclear(st->req_referrer);
|
||||
sstrlcpy(st->req_local_addr, get_local_address());
|
||||
sstrlcpy(st->req_remote_addr, get_peer_address());
|
||||
/* strclear(st->req_remote_host); */
|
||||
st->req_filetype = DEFAULT_TYPE;
|
||||
st->req_protocol = PROTO_GOPHER;
|
||||
st->req_filesize = 0;
|
||||
|
||||
/* Output */
|
||||
st->out_width = DEFAULT_WIDTH;
|
||||
st->out_charset = DEFAULT_CHARSET;
|
||||
|
||||
/* Settings */
|
||||
sstrlcpy(st->server_root, DEFAULT_ROOT);
|
||||
sstrlcpy(st->server_host_default, DEFAULT_HOST);
|
||||
|
||||
if ((c = getenv("HOSTNAME")))
|
||||
sstrlcpy(st->server_host, c);
|
||||
else if ((gethostname(buf, sizeof(buf))) != ERROR)
|
||||
sstrlcpy(st->server_host, buf);
|
||||
|
||||
st->server_port = DEFAULT_PORT;
|
||||
|
||||
st->default_filetype = DEFAULT_TYPE;
|
||||
sstrlcpy(st->map_file, DEFAULT_MAP);
|
||||
sstrlcpy(st->tag_file, DEFAULT_TAG);
|
||||
sstrlcpy(st->cgi_file, DEFAULT_CGI);
|
||||
sstrlcpy(st->user_dir, DEFAULT_USERDIR);
|
||||
strclear(st->log_file);
|
||||
|
||||
st->hidden_count = 0;
|
||||
st->filetype_count = 0;
|
||||
strclear(st->filter_dir);
|
||||
st->rewrite_count = 0;
|
||||
|
||||
strclear(st->server_description);
|
||||
strclear(st->server_location);
|
||||
strclear(st->server_platform);
|
||||
strclear(st->server_admin);
|
||||
|
||||
/* Session */
|
||||
st->session_timeout = DEFAULT_SESSION_TIMEOUT;
|
||||
st->session_max_kbytes = DEFAULT_SESSION_MAX_KBYTES;
|
||||
st->session_max_hits = DEFAULT_SESSION_MAX_HITS;
|
||||
|
||||
/* Feature options */
|
||||
st->opt_vhost = TRUE;
|
||||
st->opt_parent = TRUE;
|
||||
st->opt_header = TRUE;
|
||||
st->opt_footer = TRUE;
|
||||
st->opt_date = TRUE;
|
||||
st->opt_syslog = TRUE;
|
||||
st->opt_magic = TRUE;
|
||||
st->opt_iconv = TRUE;
|
||||
st->opt_query = TRUE;
|
||||
st->opt_caps = TRUE;
|
||||
st->opt_shm = TRUE;
|
||||
st->opt_root = TRUE;
|
||||
st->debug = FALSE;
|
||||
|
||||
/* Load default suffix -> filetype mappings */
|
||||
for (i = 0; filetypes[i]; i += 2) {
|
||||
if (st->filetype_count < MAX_FILETYPES) {
|
||||
sstrlcpy(st->filetype[st->filetype_count].suffix, filetypes[i]);
|
||||
st->filetype[st->filetype_count].type = *filetypes[i + 1];
|
||||
st->filetype_count++;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Main
|
||||
*/
|
||||
int main(int argc, char *argv[])
|
||||
{
|
||||
struct stat file;
|
||||
state st;
|
||||
char self[64];
|
||||
char selector[BUFSIZE];
|
||||
char buf[BUFSIZE];
|
||||
char *dest;
|
||||
char *c;
|
||||
#ifdef HAVE_SHMEM
|
||||
struct shmid_ds shm_ds;
|
||||
shm_state *shm;
|
||||
int shmid;
|
||||
#endif
|
||||
|
||||
/* Get the name of this binary */
|
||||
if ((c = strrchr(argv[0], '/'))) sstrlcpy(self, c + 1);
|
||||
else sstrlcpy(self, argv[0]);
|
||||
|
||||
/* Initialize state */
|
||||
#ifdef HAVE_LOCALES
|
||||
setlocale(LC_TIME, DATE_LOCALE);
|
||||
#endif
|
||||
init_state(&st);
|
||||
|
||||
/* Handle command line arguments */
|
||||
parse_args(&st, argc, argv);
|
||||
|
||||
/* Open syslog() */
|
||||
if (st.opt_syslog) openlog(self, LOG_PID, LOG_DAEMON);
|
||||
|
||||
/* Make sure the computer is turned on */
|
||||
#ifdef __HAIKU__
|
||||
if (is_computer_on() != TRUE)
|
||||
die(&st, ERR_ACCESS, "Please turn on the computer first");
|
||||
#endif
|
||||
|
||||
/* Refuse to run as root */
|
||||
#ifdef HAVE_PASSWD
|
||||
if (st.opt_root && getuid() == 0)
|
||||
die(&st, ERR_ACCESS, "Refusing to run as root");
|
||||
#endif
|
||||
|
||||
/* Try to get shared memory */
|
||||
#ifdef HAVE_SHMEM
|
||||
if ((shmid = shmget(SHM_KEY, sizeof(shm_state), IPC_CREAT | SHM_MODE)) == ERROR) {
|
||||
|
||||
/* Getting memory failed -> delete the old allocation */
|
||||
shmctl(shmid, IPC_RMID, &shm_ds);
|
||||
shm = NULL;
|
||||
}
|
||||
else {
|
||||
/* Map shared memory */
|
||||
if ((shm = (shm_state *) shmat(shmid, (void *) 0, 0)) == (void *) ERROR)
|
||||
shm = NULL;
|
||||
|
||||
/* Initialize mapped shared memory */
|
||||
if (shm && shm->start_time == 0) {
|
||||
shm->start_time = time(NULL);
|
||||
|
||||
/* Keep server platform & description in shm */
|
||||
platform(&st);
|
||||
sstrlcpy(shm->server_platform, st.server_platform);
|
||||
sstrlcpy(shm->server_description, st.server_description);
|
||||
}
|
||||
}
|
||||
|
||||
/* For debugging shared memory issues */
|
||||
if (!st.opt_shm) shm = NULL;
|
||||
|
||||
/* Get server platform and description */
|
||||
if (shm) {
|
||||
sstrlcpy(st.server_platform, shm->server_platform);
|
||||
|
||||
if (!*st.server_description)
|
||||
sstrlcpy(st.server_description, shm->server_description);
|
||||
}
|
||||
else
|
||||
#endif
|
||||
platform(&st);
|
||||
|
||||
/* Read selector, remove CRLF & encodings */
|
||||
if (fgets(selector, sizeof(selector) - 1, stdin) == NULL)
|
||||
selector[0] = '\0';
|
||||
|
||||
chomp(selector);
|
||||
strndecode(selector, selector, sizeof(selector));
|
||||
|
||||
if (st.debug) syslog(LOG_INFO, "client sent us \"%s\"", selector);
|
||||
|
||||
/* Handle hURL: redirect page */
|
||||
if (sstrncmp(selector, "URL:") == MATCH) {
|
||||
st.req_filetype = TYPE_HTML;
|
||||
sstrlcpy(st.req_selector, selector);
|
||||
url_redirect(&st);
|
||||
return OK;
|
||||
}
|
||||
|
||||
/* Handle gopher+ root requests (UMN gopher client is seriously borken) */
|
||||
if (sstrncmp(selector, "\t$") == MATCH) {
|
||||
printf("+-1" CRLF);
|
||||
printf("+INFO: 1Main menu\t\t%s\t%i" CRLF,
|
||||
st.server_host,
|
||||
st.server_port);
|
||||
printf("+VIEWS:" CRLF " application/gopher+-menu: <512b>" CRLF);
|
||||
printf("." CRLF);
|
||||
|
||||
if (st.debug) syslog(LOG_INFO, "got a request for gopher+ root menu");
|
||||
return OK;
|
||||
}
|
||||
|
||||
/* Convert HTTP request to gopher (respond using headerless HTTP/0.9) */
|
||||
if (sstrncmp(selector, "GET ") == MATCH ||
|
||||
sstrncmp(selector, "POST ") == MATCH ) {
|
||||
|
||||
if ((c = strchr(selector, ' '))) sstrlcpy(selector, c + 1);
|
||||
if ((c = strchr(selector, ' '))) *c = '\0';
|
||||
|
||||
st.req_protocol = PROTO_HTTP;
|
||||
|
||||
if (st.debug) syslog(LOG_INFO, "got HTTP request for \"%s\"", selector);
|
||||
}
|
||||
|
||||
/* Save default server_host & fetch session data (including new server_host) */
|
||||
sstrlcpy(st.server_host_default, st.server_host);
|
||||
#ifdef HAVE_SHMEM
|
||||
if (shm) get_shm_session(&st, shm);
|
||||
#endif
|
||||
|
||||
/* Loop through the selector, fix it & separate query_string */
|
||||
dest = st.req_selector;
|
||||
if (selector[0] != '/') *dest++ = '/';
|
||||
|
||||
for (c = selector; *c;) {
|
||||
|
||||
/* Skip duplicate slashes and /./ */
|
||||
while (*c == '/' && *(c + 1) == '/') c++;
|
||||
if (*c == '/' && *(c + 1) == '.' && *(c + 2) == '/') c += 2;
|
||||
|
||||
/* Start of a query string (either type 7 or HTTP-style)? */
|
||||
if (*c == '\t' || (st.opt_query && *c == '?')) {
|
||||
sstrlcpy(st.req_query_string, c + 1);
|
||||
if ((c = strchr(st.req_query_string, '\t'))) *c = '\0';
|
||||
break;
|
||||
}
|
||||
|
||||
/* Start of virtual host hint? */
|
||||
if (*c == ';') {
|
||||
if (st.opt_vhost) sstrlcpy(st.server_host, c + 1);
|
||||
|
||||
/* Skip vhost on selector */
|
||||
while (*c && *c != '\t') c++;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Copy valid char */
|
||||
*dest++ = *c++;
|
||||
}
|
||||
*dest = '\0';
|
||||
|
||||
/* Deny requests for Slashdot and /../ hackers */
|
||||
if (strstr(st.req_selector, "/."))
|
||||
die(&st, ERR_ACCESS, "Refusing to serve out dotfiles");
|
||||
|
||||
/* Handle /server-status requests */
|
||||
#ifdef HAVE_SHMEM
|
||||
if (sstrncmp(st.req_selector, SERVER_STATUS) == MATCH) {
|
||||
if (shm) server_status(&st, shm, shmid);
|
||||
return OK;
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Remove possible extra cruft from server_host */
|
||||
if ((c = strchr(st.server_host, '\t'))) *c = '\0';
|
||||
|
||||
/* Guess request filetype so we can die() with style... */
|
||||
st.req_filetype = gopher_filetype(&st, st.req_selector, FALSE);
|
||||
|
||||
/* Convert seletor to path & stat() */
|
||||
selector_to_path(&st);
|
||||
if (st.debug) syslog(LOG_INFO, "path to resource is \"%s\"", st.req_realpath);
|
||||
|
||||
if (stat(st.req_realpath, &file) == ERROR) {
|
||||
|
||||
/* Handle virtual /caps.txt requests */
|
||||
if (st.opt_caps && sstrncmp(st.req_selector, CAPS_TXT) == MATCH) {
|
||||
#ifdef HAVE_SHMEM
|
||||
caps_txt(&st, shm);
|
||||
#else
|
||||
caps_txt(&st, NULL);
|
||||
#endif
|
||||
return OK;
|
||||
}
|
||||
|
||||
/* Requested file not found - die() */
|
||||
die(&st, ERR_NOTFOUND, NULL);
|
||||
}
|
||||
|
||||
/* Fetch request filesize from stat() */
|
||||
st.req_filesize = file.st_size;
|
||||
|
||||
/* Everyone must have read access but no write access */
|
||||
if ((file.st_mode & S_IROTH) == 0)
|
||||
die(&st, ERR_ACCESS, "File or directory not world-readable");
|
||||
if ((file.st_mode & S_IWOTH) != 0)
|
||||
die(&st, ERR_ACCESS, "File or directory world-writeable");
|
||||
|
||||
/* If stat said it was a dir then it's a menu */
|
||||
if ((file.st_mode & S_IFMT) == S_IFDIR) st.req_filetype = TYPE_MENU;
|
||||
|
||||
/* Not a dir - let's guess the filetype again... */
|
||||
else if ((file.st_mode & S_IFMT) == S_IFREG)
|
||||
st.req_filetype = gopher_filetype(&st, st.req_realpath, st.opt_magic);
|
||||
|
||||
/* Menu selectors must end with a slash */
|
||||
if (st.req_filetype == TYPE_MENU && strlast(st.req_selector) != '/')
|
||||
sstrlcat(st.req_selector, "/");
|
||||
|
||||
/* Change directory to wherever the resource was */
|
||||
sstrlcpy(buf, st.req_realpath);
|
||||
|
||||
if ((file.st_mode & S_IFMT) != S_IFDIR) c = dirname(buf);
|
||||
else c = buf;
|
||||
|
||||
if (chdir(c) == ERROR) die(&st, ERR_ACCESS, NULL);
|
||||
|
||||
/* Keep count of hits and data transfer */
|
||||
#ifdef HAVE_SHMEM
|
||||
if (shm) {
|
||||
shm->hits++;
|
||||
shm->kbytes += st.req_filesize / 1024;
|
||||
|
||||
/* Update user session */
|
||||
update_shm_session(&st, shm);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Log the request */
|
||||
if (st.opt_syslog) {
|
||||
syslog(LOG_INFO, "request for \"gopher://%s:%i/%c%s\" from %s",
|
||||
st.server_host,
|
||||
st.server_port,
|
||||
st.req_filetype,
|
||||
st.req_selector,
|
||||
st.req_remote_addr);
|
||||
}
|
||||
|
||||
/* Check file type & act accordingly */
|
||||
switch (file.st_mode & S_IFMT) {
|
||||
case S_IFDIR:
|
||||
log_combined(&st, HTTP_OK);
|
||||
gopher_menu(&st);
|
||||
break;
|
||||
|
||||
case S_IFREG:
|
||||
log_combined(&st, HTTP_OK);
|
||||
gopher_file(&st);
|
||||
break;
|
||||
|
||||
default:
|
||||
die(&st, ERR_ACCESS, "Refusing to serve out special files");
|
||||
}
|
||||
|
||||
/* Clean exit */
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,410 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
#ifndef _GOPHERNICUS_H
|
||||
#define _GOPHERNICUS_H
|
||||
|
||||
|
||||
/*
|
||||
* Features
|
||||
*/
|
||||
#undef ENABLE_STRICT_RFC1436 /* Follow RFC1436 to the letter */
|
||||
#undef ENABLE_AUTOHIDING /* Hide manually listed resources from generated menus */
|
||||
|
||||
|
||||
/*
|
||||
* Platform configuration
|
||||
*/
|
||||
|
||||
/* Defaults should fit standard POSIX systems */
|
||||
#define HAVE_IPv4 /* IPv4 should work anywhere */
|
||||
#define HAVE_IPv6 /* Requires modern POSIX */
|
||||
#define HAVE_PASSWD /* For systems with passwd-like userdb */
|
||||
#define PASSWD_MIN_UID 100 /* Minimum allowed UID for ~userdirs */
|
||||
#define HAVE_LOCALES /* setlocale() and friends */
|
||||
#define HAVE_SHMEM /* Shared memory support */
|
||||
#define HAVE_UNAME /* uname() */
|
||||
#define HAVE_POPEN /* popen() */
|
||||
#undef HAVE_STRLCPY /* strlcpy() from OpenBSD */
|
||||
#undef HAVE_SENDFILE /* sendfile() in Linux & others */
|
||||
|
||||
/* Linux */
|
||||
#ifdef __linux
|
||||
#undef PASSWD_MIN_UID
|
||||
#define PASSWD_MIN_UID 500
|
||||
#define HAVE_SENDFILE
|
||||
#endif
|
||||
|
||||
/* Embedded Linux with uClibc */
|
||||
#ifdef __UCLIBC__
|
||||
lskdjf
|
||||
#undef HAVE_SHMEM
|
||||
#undef HAVE_PASSWD
|
||||
#endif
|
||||
|
||||
/* Haiku */
|
||||
#ifdef __HAIKU__
|
||||
#undef HAVE_SHMEM
|
||||
#undef HAVE_PASSWD
|
||||
#endif
|
||||
|
||||
/* OpenBSD */
|
||||
#ifdef __OpenBSD__
|
||||
#define HAVE_STRLCPY
|
||||
#endif
|
||||
|
||||
/* Add other OS-specific defines here */
|
||||
|
||||
/*
|
||||
* Include headers
|
||||
*/
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <unistd.h>
|
||||
#include <sys/types.h>
|
||||
#include <sys/stat.h>
|
||||
#include <dirent.h>
|
||||
#include <string.h>
|
||||
#include <libgen.h>
|
||||
#include <time.h>
|
||||
#include <syslog.h>
|
||||
#include <errno.h>
|
||||
#include <pwd.h>
|
||||
#include <limits.h>
|
||||
|
||||
#ifdef HAVE_SENDFILE
|
||||
#include <sys/sendfile.h>
|
||||
#include <fcntl.h>
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_LOCALES
|
||||
#include <locale.h>
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_SHMEM
|
||||
#include <sys/ipc.h>
|
||||
#include <sys/shm.h>
|
||||
#else
|
||||
#define shm_state void
|
||||
#endif
|
||||
|
||||
#if defined(HAVE_IPv4) || defined(HAVE_IPv6)
|
||||
#include <sys/socket.h>
|
||||
#include <netinet/in.h>
|
||||
#include <arpa/inet.h>
|
||||
#endif
|
||||
|
||||
#ifdef HAVE_UNAME
|
||||
#include <sys/utsname.h>
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* Compile-time configuration
|
||||
*/
|
||||
|
||||
/* Common stuff */
|
||||
#define CRLF "\r\n"
|
||||
#define EMPTY ""
|
||||
#define PARENT ".."
|
||||
#define ROOT "/"
|
||||
|
||||
#define FALSE 0
|
||||
#define TRUE 1
|
||||
|
||||
#define QUIT 1
|
||||
#define OK 0
|
||||
#define ERROR -1
|
||||
|
||||
#define MATCH 0
|
||||
|
||||
/* Gopher filetypes */
|
||||
#define TYPE_TEXT '0'
|
||||
#define TYPE_MENU '1'
|
||||
#define TYPE_ERROR '3'
|
||||
#define TYPE_GZIP '5'
|
||||
#define TYPE_QUERY '7'
|
||||
#define TYPE_BINARY '9'
|
||||
#define TYPE_GIF 'g'
|
||||
#define TYPE_HTML 'h'
|
||||
#define TYPE_INFO 'i'
|
||||
#define TYPE_IMAGE 'I'
|
||||
#define TYPE_MIME 'M'
|
||||
#define TYPE_DOC 'd'
|
||||
#define TYPE_TITLE '!'
|
||||
|
||||
/* Protocols */
|
||||
#define PROTO_GOPHER 'g'
|
||||
#define PROTO_HTTP 'h'
|
||||
|
||||
/* Charsets */
|
||||
#define AUTO 0
|
||||
#define US_ASCII 1
|
||||
#define ISO_8859_1 2
|
||||
#define UTF_8 3
|
||||
|
||||
/* HTTP protocol stuff for logging */
|
||||
#define HTTP_OK 200
|
||||
#define HTTP_404 404
|
||||
#define HTTP_DATE "%d/%b/%Y:%T %z"
|
||||
#define HTTP_USERAGENT "Unknown gopher client"
|
||||
|
||||
/* Defaults for settings */
|
||||
#define DEFAULT_HOST "localhost"
|
||||
#define DEFAULT_PORT 70
|
||||
#define DEFAULT_TYPE TYPE_TEXT
|
||||
#define DEFAULT_MAP "gophermap"
|
||||
#define DEFAULT_TAG "gophertag"
|
||||
#define DEFAULT_CGI "/cgi-bin/"
|
||||
#define DEFAULT_USERDIR "public_gopher"
|
||||
#define DEFAULT_ADDR "unknown"
|
||||
#define DEFAULT_WIDTH 70
|
||||
#define DEFAULT_CHARSET US_ASCII
|
||||
#define MIN_WIDTH 33
|
||||
#define MAX_WIDTH 200
|
||||
|
||||
/* Session defaults */
|
||||
#define DEFAULT_SESSION_TIMEOUT 1800
|
||||
#define DEFAULT_SESSION_MAX_KBYTES 4194304
|
||||
#define DEFAULT_SESSION_MAX_HITS 4096
|
||||
|
||||
/* Dummy values for gopher protocol */
|
||||
#define DUMMY_SELECTOR "null"
|
||||
#define DUMMY_HOST "null.host\t1"
|
||||
|
||||
/* Safe $PATH for exec() */
|
||||
#ifdef __HAIKU__
|
||||
#define SAFE_PATH "/boot/common/bin:/bin"
|
||||
#else
|
||||
#define SAFE_PATH "/usr/bin:/bin"
|
||||
#endif
|
||||
|
||||
/* Special requests */
|
||||
#define SERVER_STATUS "/server-status"
|
||||
#define CAPS_TXT "/caps.txt"
|
||||
|
||||
/* Error messages */
|
||||
#define ERR_ACCESS "Access denied!"
|
||||
#define ERR_NOTFOUND "File or directory not found!"
|
||||
|
||||
#define ERROR_HOST "error.host\t1"
|
||||
#define ERROR_PREFIX "Error: "
|
||||
|
||||
/* Strings */
|
||||
#define SERVER_SOFTWARE "Gophernicus"
|
||||
#define SERVER_SOFTWARE_FULL SERVER_SOFTWARE "/" VERSION " (%s)"
|
||||
|
||||
#define HEADER_FORMAT "[%s]"
|
||||
#define FOOTER_FORMAT "Gophered by Gophernicus/" VERSION " on %s"
|
||||
|
||||
#define UNITS "KB", "MB", "GB", "TB", "PB", NULL
|
||||
#define DATE_FORMAT "%Y-%b-%d %H:%M" /* See man 3 strftime */
|
||||
#define DATE_WIDTH 17
|
||||
#define DATE_LOCALE "POSIX"
|
||||
|
||||
#define USERDIR_FORMAT "~%s", pwd->pw_name /* See man 3 getpwent */
|
||||
#define VHOST_FORMAT "gopher://%s/"
|
||||
|
||||
/* ISO-8859-1 to US-ASCII look-alike conversion table */
|
||||
#define ASCII \
|
||||
"E?,f..++^%S<??Z?" \
|
||||
"?''\"\"*--~?s>??zY" \
|
||||
" !c_*Y|$\"C?<?-R-" \
|
||||
"??23'u?*,1?>????" \
|
||||
"AAAAAAACEEEEIIII" \
|
||||
"DNOOOOO*OUUUUYTB" \
|
||||
"aaaaaaaceeeeiiii" \
|
||||
"dnooooo/ouuuuyty"
|
||||
|
||||
#define UNKNOWN '?'
|
||||
|
||||
/* Sizes & maximums */
|
||||
#define BUFSIZE 1024 /* Default size for string buffers */
|
||||
#define MAX_HIDDEN 32 /* Maximum number of hidden files */
|
||||
#define MAX_FILETYPES 128 /* Maximum number of suffix to filetype mappings */
|
||||
#define MAX_FILTERS 16 /* Maximum number of file filters */
|
||||
#define MAX_SDIRENT 1024 /* Maximum number of files per directory to handle */
|
||||
#define MAX_REWRITE 32 /* Maximum number of selector rewrite options */
|
||||
|
||||
/* Struct for file suffix -> gopher filetype mapping */
|
||||
typedef struct {
|
||||
char suffix[15];
|
||||
char type;
|
||||
} ftype;
|
||||
|
||||
/* Struct for selector rewriting */
|
||||
typedef struct {
|
||||
char match[BUFSIZE];
|
||||
char replace[BUFSIZE];
|
||||
} srewrite;
|
||||
|
||||
/* Struct for keeping the current options & state */
|
||||
typedef struct {
|
||||
|
||||
/* Request */
|
||||
char req_selector[BUFSIZE];
|
||||
char req_realpath[BUFSIZE];
|
||||
char req_query_string[BUFSIZE];
|
||||
char req_referrer[BUFSIZE];
|
||||
char req_local_addr[64];
|
||||
char req_remote_addr[64];
|
||||
char req_filetype;
|
||||
char req_protocol;
|
||||
off_t req_filesize;
|
||||
|
||||
/* Output */
|
||||
int out_width;
|
||||
int out_charset;
|
||||
|
||||
/* Settings */
|
||||
char server_description[64];
|
||||
char server_location[64];
|
||||
char server_platform[64];
|
||||
char server_admin[64];
|
||||
char server_root[256];
|
||||
char server_host_default[64];
|
||||
char server_host[64];
|
||||
int server_port;
|
||||
|
||||
char default_filetype;
|
||||
char map_file[64];
|
||||
char tag_file[64];
|
||||
char cgi_file[64];
|
||||
char user_dir[64];
|
||||
char log_file[256];
|
||||
|
||||
char hidden[MAX_HIDDEN][256];
|
||||
int hidden_count;
|
||||
|
||||
ftype filetype[MAX_FILETYPES];
|
||||
int filetype_count;
|
||||
char filter_dir[64];
|
||||
|
||||
srewrite rewrite[MAX_REWRITE];
|
||||
int rewrite_count;
|
||||
|
||||
/* Session */
|
||||
int session_timeout;
|
||||
int session_max_kbytes;
|
||||
int session_max_hits;
|
||||
|
||||
/* Feature options */
|
||||
char opt_parent;
|
||||
char opt_header;
|
||||
char opt_footer;
|
||||
char opt_date;
|
||||
char opt_syslog;
|
||||
char opt_magic;
|
||||
char opt_iconv;
|
||||
char opt_vhost;
|
||||
char opt_query;
|
||||
char opt_caps;
|
||||
char opt_shm;
|
||||
char opt_root;
|
||||
char debug;
|
||||
} state;
|
||||
|
||||
/* Shared memory for session & accounting data */
|
||||
#ifdef HAVE_SHMEM
|
||||
|
||||
#define SHM_KEY 0xbeeb0006 /* Unique identifier + struct version */
|
||||
#define SHM_MODE 0600 /* Access mode for the shared memory */
|
||||
#define SHM_SESSIONS 256 /* Max amount of user sessions to track */
|
||||
|
||||
typedef struct {
|
||||
long hits;
|
||||
long kbytes;
|
||||
|
||||
time_t req_atime;
|
||||
char req_selector[128];
|
||||
char req_remote_addr[64];
|
||||
char req_filetype;
|
||||
|
||||
char server_host[64];
|
||||
int server_port;
|
||||
} shm_session;
|
||||
|
||||
typedef struct {
|
||||
time_t start_time;
|
||||
long hits;
|
||||
long kbytes;
|
||||
char server_platform[64];
|
||||
char server_description[64];
|
||||
shm_session session[SHM_SESSIONS];
|
||||
} shm_state;
|
||||
|
||||
#endif
|
||||
|
||||
/* Struct for directory sorting */
|
||||
typedef struct {
|
||||
char name[128]; /* Should be 256 but we're saving stack space */
|
||||
mode_t mode;
|
||||
uid_t uid;
|
||||
gid_t gid;
|
||||
off_t size;
|
||||
time_t mtime;
|
||||
} sdirent;
|
||||
|
||||
|
||||
/* File suffix to gopher filetype mappings */
|
||||
#define FILETYPES \
|
||||
"txt","0","pl","0","py","0","sh","0","tcl","0","c","0","cpp","0", "h","0","log","0", \
|
||||
"conf","0","php","0","php3","0", \
|
||||
"map","1","menu","1", \
|
||||
"hqx","4", \
|
||||
"Z","5","gz","5","tgz","5","tar","5","zip","5","bz2","5","rar","5","sea","5", \
|
||||
"q","7","qry","7", \
|
||||
"iso","9","so","9","o","9","rtf","9","ttf","9","bin","9", \
|
||||
"ics","c","ical","c", \
|
||||
"gif","g", \
|
||||
"html","h","htm","h","xhtml","h","css","h","swf","h","rdf","h","rss","h","xml","h", \
|
||||
"jpg","I","jpeg","I","png","I","bmp","I","svg","I","tif","I","tiff","I", \
|
||||
"ico","I","xbm","I","xpm","I","pcx","I", \
|
||||
"mbox","M", \
|
||||
"pdf","d","ps","d","doc","d","ppt","d","xls","d","xlsx","d","docx","d","pptx","d", \
|
||||
"mp3","s","wav","s","mid","s","wma","s","flac","s","ogg","s","aiff","s","aac","s", \
|
||||
"avi",";","mp4",";","mpg",";","mov",";","qt",";","asf",";","mpv",";","m4v",";", \
|
||||
NULL, NULL
|
||||
|
||||
/*
|
||||
* Useful macros
|
||||
*/
|
||||
#define strclear(str) str[0] = '\0';
|
||||
#define sstrlcpy(dest, src) strlcpy(dest, src, sizeof(dest))
|
||||
#define sstrlcat(dest, src) strlcat(dest, src, sizeof(dest))
|
||||
#define sstrncmp(s1, s2) strncmp(s1, s2, sizeof(s2) - 1)
|
||||
#define sstrncasecmp(s1, s2) strncasecmp(s1, s2, sizeof(s2) - 1)
|
||||
#define sstrniconv(charset, out, in) strniconv(charset, out, in, sizeof(out))
|
||||
#define max(a,b) (((a) > (b)) ? (a) : (b))
|
||||
#define min(a,b) (((a) < (b)) ? (a) : (b))
|
||||
|
||||
/*
|
||||
* Include generated headers
|
||||
*/
|
||||
#include "functions.h"
|
||||
#include "files.h"
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
# default: on
|
||||
# description: Gophernicus - Modern full-featured gopher server
|
||||
service gopher
|
||||
{
|
||||
socket_type = stream
|
||||
wait = no
|
||||
user = nobody
|
||||
server = /usr/sbin/in.gophernicus
|
||||
server_args = -r/var/gopher -h@HOSTNAME@
|
||||
disable = no
|
||||
}
|
||||
|
|
@ -0,0 +1,520 @@
|
|||
#!/bin/sh
|
||||
# install - install a program, script, or datafile
|
||||
|
||||
scriptversion=2009-04-28.21; # UTC
|
||||
|
||||
# This originates from X11R5 (mit/util/scripts/install.sh), which was
|
||||
# later released in X11R6 (xc/config/util/install.sh) with the
|
||||
# following copyright and license.
|
||||
#
|
||||
# Copyright (C) 1994 X Consortium
|
||||
#
|
||||
# Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
# of this software and associated documentation files (the "Software"), to
|
||||
# deal in the Software without restriction, including without limitation the
|
||||
# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
||||
# sell copies of the Software, and to permit persons to whom the Software is
|
||||
# furnished to do so, subject to the following conditions:
|
||||
#
|
||||
# The above copyright notice and this permission notice shall be included in
|
||||
# all copies or substantial portions of the Software.
|
||||
#
|
||||
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
# X CONSORTIUM BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
||||
# AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNEC-
|
||||
# TION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||||
#
|
||||
# Except as contained in this notice, the name of the X Consortium shall not
|
||||
# be used in advertising or otherwise to promote the sale, use or other deal-
|
||||
# ings in this Software without prior written authorization from the X Consor-
|
||||
# tium.
|
||||
#
|
||||
#
|
||||
# FSF changes to this file are in the public domain.
|
||||
#
|
||||
# Calling this script install-sh is preferred over install.sh, to prevent
|
||||
# `make' implicit rules from creating a file called install from it
|
||||
# when there is no Makefile.
|
||||
#
|
||||
# This script is compatible with the BSD install script, but was written
|
||||
# from scratch.
|
||||
|
||||
nl='
|
||||
'
|
||||
IFS=" "" $nl"
|
||||
|
||||
# set DOITPROG to echo to test this script
|
||||
|
||||
# Don't use :- since 4.3BSD and earlier shells don't like it.
|
||||
doit=${DOITPROG-}
|
||||
if test -z "$doit"; then
|
||||
doit_exec=exec
|
||||
else
|
||||
doit_exec=$doit
|
||||
fi
|
||||
|
||||
# Put in absolute file names if you don't have them in your path;
|
||||
# or use environment vars.
|
||||
|
||||
chgrpprog=${CHGRPPROG-chgrp}
|
||||
chmodprog=${CHMODPROG-chmod}
|
||||
chownprog=${CHOWNPROG-chown}
|
||||
cmpprog=${CMPPROG-cmp}
|
||||
cpprog=${CPPROG-cp}
|
||||
mkdirprog=${MKDIRPROG-mkdir}
|
||||
mvprog=${MVPROG-mv}
|
||||
rmprog=${RMPROG-rm}
|
||||
stripprog=${STRIPPROG-strip}
|
||||
|
||||
posix_glob='?'
|
||||
initialize_posix_glob='
|
||||
test "$posix_glob" != "?" || {
|
||||
if (set -f) 2>/dev/null; then
|
||||
posix_glob=
|
||||
else
|
||||
posix_glob=:
|
||||
fi
|
||||
}
|
||||
'
|
||||
|
||||
posix_mkdir=
|
||||
|
||||
# Desired mode of installed file.
|
||||
mode=0755
|
||||
|
||||
chgrpcmd=
|
||||
chmodcmd=$chmodprog
|
||||
chowncmd=
|
||||
mvcmd=$mvprog
|
||||
rmcmd="$rmprog -f"
|
||||
stripcmd=
|
||||
|
||||
src=
|
||||
dst=
|
||||
dir_arg=
|
||||
dst_arg=
|
||||
|
||||
copy_on_change=false
|
||||
no_target_directory=
|
||||
|
||||
usage="\
|
||||
Usage: $0 [OPTION]... [-T] SRCFILE DSTFILE
|
||||
or: $0 [OPTION]... SRCFILES... DIRECTORY
|
||||
or: $0 [OPTION]... -t DIRECTORY SRCFILES...
|
||||
or: $0 [OPTION]... -d DIRECTORIES...
|
||||
|
||||
In the 1st form, copy SRCFILE to DSTFILE.
|
||||
In the 2nd and 3rd, copy all SRCFILES to DIRECTORY.
|
||||
In the 4th, create DIRECTORIES.
|
||||
|
||||
Options:
|
||||
--help display this help and exit.
|
||||
--version display version info and exit.
|
||||
|
||||
-c (ignored)
|
||||
-C install only if different (preserve the last data modification time)
|
||||
-d create directories instead of installing files.
|
||||
-g GROUP $chgrpprog installed files to GROUP.
|
||||
-m MODE $chmodprog installed files to MODE.
|
||||
-o USER $chownprog installed files to USER.
|
||||
-s $stripprog installed files.
|
||||
-t DIRECTORY install into DIRECTORY.
|
||||
-T report an error if DSTFILE is a directory.
|
||||
|
||||
Environment variables override the default commands:
|
||||
CHGRPPROG CHMODPROG CHOWNPROG CMPPROG CPPROG MKDIRPROG MVPROG
|
||||
RMPROG STRIPPROG
|
||||
"
|
||||
|
||||
while test $# -ne 0; do
|
||||
case $1 in
|
||||
-c) ;;
|
||||
|
||||
-C) copy_on_change=true;;
|
||||
|
||||
-d) dir_arg=true;;
|
||||
|
||||
-g) chgrpcmd="$chgrpprog $2"
|
||||
shift;;
|
||||
|
||||
--help) echo "$usage"; exit $?;;
|
||||
|
||||
-m) mode=$2
|
||||
case $mode in
|
||||
*' '* | *' '* | *'
|
||||
'* | *'*'* | *'?'* | *'['*)
|
||||
echo "$0: invalid mode: $mode" >&2
|
||||
exit 1;;
|
||||
esac
|
||||
shift;;
|
||||
|
||||
-o) chowncmd="$chownprog $2"
|
||||
shift;;
|
||||
|
||||
-s) stripcmd=$stripprog;;
|
||||
|
||||
-t) dst_arg=$2
|
||||
shift;;
|
||||
|
||||
-T) no_target_directory=true;;
|
||||
|
||||
--version) echo "$0 $scriptversion"; exit $?;;
|
||||
|
||||
--) shift
|
||||
break;;
|
||||
|
||||
-*) echo "$0: invalid option: $1" >&2
|
||||
exit 1;;
|
||||
|
||||
*) break;;
|
||||
esac
|
||||
shift
|
||||
done
|
||||
|
||||
if test $# -ne 0 && test -z "$dir_arg$dst_arg"; then
|
||||
# When -d is used, all remaining arguments are directories to create.
|
||||
# When -t is used, the destination is already specified.
|
||||
# Otherwise, the last argument is the destination. Remove it from $@.
|
||||
for arg
|
||||
do
|
||||
if test -n "$dst_arg"; then
|
||||
# $@ is not empty: it contains at least $arg.
|
||||
set fnord "$@" "$dst_arg"
|
||||
shift # fnord
|
||||
fi
|
||||
shift # arg
|
||||
dst_arg=$arg
|
||||
done
|
||||
fi
|
||||
|
||||
if test $# -eq 0; then
|
||||
if test -z "$dir_arg"; then
|
||||
echo "$0: no input file specified." >&2
|
||||
exit 1
|
||||
fi
|
||||
# It's OK to call `install-sh -d' without argument.
|
||||
# This can happen when creating conditional directories.
|
||||
exit 0
|
||||
fi
|
||||
|
||||
if test -z "$dir_arg"; then
|
||||
trap '(exit $?); exit' 1 2 13 15
|
||||
|
||||
# Set umask so as not to create temps with too-generous modes.
|
||||
# However, 'strip' requires both read and write access to temps.
|
||||
case $mode in
|
||||
# Optimize common cases.
|
||||
*644) cp_umask=133;;
|
||||
*755) cp_umask=22;;
|
||||
|
||||
*[0-7])
|
||||
if test -z "$stripcmd"; then
|
||||
u_plus_rw=
|
||||
else
|
||||
u_plus_rw='% 200'
|
||||
fi
|
||||
cp_umask=`expr '(' 777 - $mode % 1000 ')' $u_plus_rw`;;
|
||||
*)
|
||||
if test -z "$stripcmd"; then
|
||||
u_plus_rw=
|
||||
else
|
||||
u_plus_rw=,u+rw
|
||||
fi
|
||||
cp_umask=$mode$u_plus_rw;;
|
||||
esac
|
||||
fi
|
||||
|
||||
for src
|
||||
do
|
||||
# Protect names starting with `-'.
|
||||
case $src in
|
||||
-*) src=./$src;;
|
||||
esac
|
||||
|
||||
if test -n "$dir_arg"; then
|
||||
dst=$src
|
||||
dstdir=$dst
|
||||
test -d "$dstdir"
|
||||
dstdir_status=$?
|
||||
else
|
||||
|
||||
# Waiting for this to be detected by the "$cpprog $src $dsttmp" command
|
||||
# might cause directories to be created, which would be especially bad
|
||||
# if $src (and thus $dsttmp) contains '*'.
|
||||
if test ! -f "$src" && test ! -d "$src"; then
|
||||
echo "$0: $src does not exist." >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
if test -z "$dst_arg"; then
|
||||
echo "$0: no destination specified." >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
dst=$dst_arg
|
||||
# Protect names starting with `-'.
|
||||
case $dst in
|
||||
-*) dst=./$dst;;
|
||||
esac
|
||||
|
||||
# If destination is a directory, append the input filename; won't work
|
||||
# if double slashes aren't ignored.
|
||||
if test -d "$dst"; then
|
||||
if test -n "$no_target_directory"; then
|
||||
echo "$0: $dst_arg: Is a directory" >&2
|
||||
exit 1
|
||||
fi
|
||||
dstdir=$dst
|
||||
dst=$dstdir/`basename "$src"`
|
||||
dstdir_status=0
|
||||
else
|
||||
# Prefer dirname, but fall back on a substitute if dirname fails.
|
||||
dstdir=`
|
||||
(dirname "$dst") 2>/dev/null ||
|
||||
expr X"$dst" : 'X\(.*[^/]\)//*[^/][^/]*/*$' \| \
|
||||
X"$dst" : 'X\(//\)[^/]' \| \
|
||||
X"$dst" : 'X\(//\)$' \| \
|
||||
X"$dst" : 'X\(/\)' \| . 2>/dev/null ||
|
||||
echo X"$dst" |
|
||||
sed '/^X\(.*[^/]\)\/\/*[^/][^/]*\/*$/{
|
||||
s//\1/
|
||||
q
|
||||
}
|
||||
/^X\(\/\/\)[^/].*/{
|
||||
s//\1/
|
||||
q
|
||||
}
|
||||
/^X\(\/\/\)$/{
|
||||
s//\1/
|
||||
q
|
||||
}
|
||||
/^X\(\/\).*/{
|
||||
s//\1/
|
||||
q
|
||||
}
|
||||
s/.*/./; q'
|
||||
`
|
||||
|
||||
test -d "$dstdir"
|
||||
dstdir_status=$?
|
||||
fi
|
||||
fi
|
||||
|
||||
obsolete_mkdir_used=false
|
||||
|
||||
if test $dstdir_status != 0; then
|
||||
case $posix_mkdir in
|
||||
'')
|
||||
# Create intermediate dirs using mode 755 as modified by the umask.
|
||||
# This is like FreeBSD 'install' as of 1997-10-28.
|
||||
umask=`umask`
|
||||
case $stripcmd.$umask in
|
||||
# Optimize common cases.
|
||||
*[2367][2367]) mkdir_umask=$umask;;
|
||||
.*0[02][02] | .[02][02] | .[02]) mkdir_umask=22;;
|
||||
|
||||
*[0-7])
|
||||
mkdir_umask=`expr $umask + 22 \
|
||||
- $umask % 100 % 40 + $umask % 20 \
|
||||
- $umask % 10 % 4 + $umask % 2
|
||||
`;;
|
||||
*) mkdir_umask=$umask,go-w;;
|
||||
esac
|
||||
|
||||
# With -d, create the new directory with the user-specified mode.
|
||||
# Otherwise, rely on $mkdir_umask.
|
||||
if test -n "$dir_arg"; then
|
||||
mkdir_mode=-m$mode
|
||||
else
|
||||
mkdir_mode=
|
||||
fi
|
||||
|
||||
posix_mkdir=false
|
||||
case $umask in
|
||||
*[123567][0-7][0-7])
|
||||
# POSIX mkdir -p sets u+wx bits regardless of umask, which
|
||||
# is incompatible with FreeBSD 'install' when (umask & 300) != 0.
|
||||
;;
|
||||
*)
|
||||
tmpdir=${TMPDIR-/tmp}/ins$RANDOM-$$
|
||||
trap 'ret=$?; rmdir "$tmpdir/d" "$tmpdir" 2>/dev/null; exit $ret' 0
|
||||
|
||||
if (umask $mkdir_umask &&
|
||||
exec $mkdirprog $mkdir_mode -p -- "$tmpdir/d") >/dev/null 2>&1
|
||||
then
|
||||
if test -z "$dir_arg" || {
|
||||
# Check for POSIX incompatibilities with -m.
|
||||
# HP-UX 11.23 and IRIX 6.5 mkdir -m -p sets group- or
|
||||
# other-writeable bit of parent directory when it shouldn't.
|
||||
# FreeBSD 6.1 mkdir -m -p sets mode of existing directory.
|
||||
ls_ld_tmpdir=`ls -ld "$tmpdir"`
|
||||
case $ls_ld_tmpdir in
|
||||
d????-?r-*) different_mode=700;;
|
||||
d????-?--*) different_mode=755;;
|
||||
*) false;;
|
||||
esac &&
|
||||
$mkdirprog -m$different_mode -p -- "$tmpdir" && {
|
||||
ls_ld_tmpdir_1=`ls -ld "$tmpdir"`
|
||||
test "$ls_ld_tmpdir" = "$ls_ld_tmpdir_1"
|
||||
}
|
||||
}
|
||||
then posix_mkdir=:
|
||||
fi
|
||||
rmdir "$tmpdir/d" "$tmpdir"
|
||||
else
|
||||
# Remove any dirs left behind by ancient mkdir implementations.
|
||||
rmdir ./$mkdir_mode ./-p ./-- 2>/dev/null
|
||||
fi
|
||||
trap '' 0;;
|
||||
esac;;
|
||||
esac
|
||||
|
||||
if
|
||||
$posix_mkdir && (
|
||||
umask $mkdir_umask &&
|
||||
$doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir"
|
||||
)
|
||||
then :
|
||||
else
|
||||
|
||||
# The umask is ridiculous, or mkdir does not conform to POSIX,
|
||||
# or it failed possibly due to a race condition. Create the
|
||||
# directory the slow way, step by step, checking for races as we go.
|
||||
|
||||
case $dstdir in
|
||||
/*) prefix='/';;
|
||||
-*) prefix='./';;
|
||||
*) prefix='';;
|
||||
esac
|
||||
|
||||
eval "$initialize_posix_glob"
|
||||
|
||||
oIFS=$IFS
|
||||
IFS=/
|
||||
$posix_glob set -f
|
||||
set fnord $dstdir
|
||||
shift
|
||||
$posix_glob set +f
|
||||
IFS=$oIFS
|
||||
|
||||
prefixes=
|
||||
|
||||
for d
|
||||
do
|
||||
test -z "$d" && continue
|
||||
|
||||
prefix=$prefix$d
|
||||
if test -d "$prefix"; then
|
||||
prefixes=
|
||||
else
|
||||
if $posix_mkdir; then
|
||||
(umask=$mkdir_umask &&
|
||||
$doit_exec $mkdirprog $mkdir_mode -p -- "$dstdir") && break
|
||||
# Don't fail if two instances are running concurrently.
|
||||
test -d "$prefix" || exit 1
|
||||
else
|
||||
case $prefix in
|
||||
*\'*) qprefix=`echo "$prefix" | sed "s/'/'\\\\\\\\''/g"`;;
|
||||
*) qprefix=$prefix;;
|
||||
esac
|
||||
prefixes="$prefixes '$qprefix'"
|
||||
fi
|
||||
fi
|
||||
prefix=$prefix/
|
||||
done
|
||||
|
||||
if test -n "$prefixes"; then
|
||||
# Don't fail if two instances are running concurrently.
|
||||
(umask $mkdir_umask &&
|
||||
eval "\$doit_exec \$mkdirprog $prefixes") ||
|
||||
test -d "$dstdir" || exit 1
|
||||
obsolete_mkdir_used=true
|
||||
fi
|
||||
fi
|
||||
fi
|
||||
|
||||
if test -n "$dir_arg"; then
|
||||
{ test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
|
||||
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
|
||||
{ test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
|
||||
test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
|
||||
else
|
||||
|
||||
# Make a couple of temp file names in the proper directory.
|
||||
dsttmp=$dstdir/_inst.$$_
|
||||
rmtmp=$dstdir/_rm.$$_
|
||||
|
||||
# Trap to clean up those temp files at exit.
|
||||
trap 'ret=$?; rm -f "$dsttmp" "$rmtmp" && exit $ret' 0
|
||||
|
||||
# Copy the file name to the temp name.
|
||||
(umask $cp_umask && $doit_exec $cpprog "$src" "$dsttmp") &&
|
||||
|
||||
# and set any options; do chmod last to preserve setuid bits.
|
||||
#
|
||||
# If any of these fail, we abort the whole thing. If we want to
|
||||
# ignore errors from any of these, just make sure not to ignore
|
||||
# errors from the above "$doit $cpprog $src $dsttmp" command.
|
||||
#
|
||||
{ test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
|
||||
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
|
||||
{ test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
|
||||
{ test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
|
||||
|
||||
# If -C, don't bother to copy if it wouldn't change the file.
|
||||
if $copy_on_change &&
|
||||
old=`LC_ALL=C ls -dlL "$dst" 2>/dev/null` &&
|
||||
new=`LC_ALL=C ls -dlL "$dsttmp" 2>/dev/null` &&
|
||||
|
||||
eval "$initialize_posix_glob" &&
|
||||
$posix_glob set -f &&
|
||||
set X $old && old=:$2:$4:$5:$6 &&
|
||||
set X $new && new=:$2:$4:$5:$6 &&
|
||||
$posix_glob set +f &&
|
||||
|
||||
test "$old" = "$new" &&
|
||||
$cmpprog "$dst" "$dsttmp" >/dev/null 2>&1
|
||||
then
|
||||
rm -f "$dsttmp"
|
||||
else
|
||||
# Rename the file to the real destination.
|
||||
$doit $mvcmd -f "$dsttmp" "$dst" 2>/dev/null ||
|
||||
|
||||
# The rename failed, perhaps because mv can't rename something else
|
||||
# to itself, or perhaps because mv is so ancient that it does not
|
||||
# support -f.
|
||||
{
|
||||
# Now remove or move aside any old file at destination location.
|
||||
# We try this two ways since rm can't unlink itself on some
|
||||
# systems and the destination file might be busy for other
|
||||
# reasons. In this case, the final cleanup might fail but the new
|
||||
# file should still install successfully.
|
||||
{
|
||||
test ! -f "$dst" ||
|
||||
$doit $rmcmd -f "$dst" 2>/dev/null ||
|
||||
{ $doit $mvcmd -f "$dst" "$rmtmp" 2>/dev/null &&
|
||||
{ $doit $rmcmd -f "$rmtmp" 2>/dev/null; :; }
|
||||
} ||
|
||||
{ echo "$0: cannot unlink or rename $dst" >&2
|
||||
(exit 1); exit 1
|
||||
}
|
||||
} &&
|
||||
|
||||
# Now rename the file to the real destination.
|
||||
$doit $mvcmd "$dsttmp" "$dst"
|
||||
}
|
||||
fi || exit 1
|
||||
|
||||
trap '' 0
|
||||
fi
|
||||
done
|
||||
|
||||
# Local variables:
|
||||
# eval: (add-hook 'write-file-hooks 'time-stamp)
|
||||
# time-stamp-start: "scriptversion="
|
||||
# time-stamp-format: "%:y-%02m-%02d.%02H"
|
||||
# time-stamp-time-zone: "UTC"
|
||||
# time-stamp-end: "; # UTC"
|
||||
# End:
|
||||
|
|
@ -0,0 +1,665 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Alphabetic folders first sort for sortdir()
|
||||
*/
|
||||
int foldersort(const void *a, const void *b)
|
||||
{
|
||||
mode_t amode;
|
||||
mode_t bmode;
|
||||
|
||||
amode = (*(sdirent *) a).mode & S_IFMT;
|
||||
bmode = (*(sdirent *) b).mode & S_IFMT;
|
||||
|
||||
if (amode == S_IFDIR && bmode != S_IFDIR) return -1;
|
||||
if (amode != S_IFDIR && bmode == S_IFDIR) return 1;
|
||||
|
||||
return strcmp((*(sdirent *) a).name, (*(sdirent *) b).name);
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Scan, stat and sort a directory folders first (scandir replacement)
|
||||
*/
|
||||
int sortdir(char *path, sdirent *list, int max)
|
||||
{
|
||||
DIR *dp;
|
||||
struct dirent *d;
|
||||
struct stat s;
|
||||
char buf[BUFSIZE];
|
||||
int i;
|
||||
|
||||
/* Try to open the dir */
|
||||
if ((dp = opendir(path)) == NULL) return 0;
|
||||
i = 0;
|
||||
|
||||
/* Loop through the directory & stat() everything */
|
||||
while (max--) {
|
||||
if ((d = readdir(dp)) == NULL) break;
|
||||
|
||||
snprintf(buf, sizeof(buf), "%s/%s", path, d->d_name);
|
||||
if (stat(buf, &s) == ERROR) continue;
|
||||
|
||||
if (strlen(d->d_name) > sizeof(list[i].name)) continue;
|
||||
sstrlcpy(list[i].name, d->d_name);
|
||||
|
||||
list[i].mode = s.st_mode;
|
||||
list[i].uid = s.st_uid;
|
||||
list[i].gid = s.st_gid;
|
||||
list[i].size = s.st_size;
|
||||
list[i].mtime = s.st_mtime;
|
||||
i++;
|
||||
}
|
||||
closedir(dp);
|
||||
|
||||
/* Sort the entries */
|
||||
if (i > 1) qsort(list, i, sizeof(sdirent), foldersort);
|
||||
|
||||
/* Return number of entries found */
|
||||
return i;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Print a list of users with ~/public_gopher
|
||||
*/
|
||||
#ifdef HAVE_PASSWD
|
||||
void userlist(state *st)
|
||||
{
|
||||
struct passwd *pwd;
|
||||
struct stat dir;
|
||||
char buf[BUFSIZE];
|
||||
struct tm *ltime;
|
||||
char timestr[20];
|
||||
int width;
|
||||
|
||||
/* Width of filenames for fancy listing */
|
||||
width = st->out_width - DATE_WIDTH - 15;
|
||||
|
||||
/* Loop through all users */
|
||||
setpwent();
|
||||
while ((pwd = getpwent())) {
|
||||
|
||||
/* Skip too small uids */
|
||||
if (pwd->pw_uid < PASSWD_MIN_UID) continue;
|
||||
|
||||
/* Look for a world-readable user-owned ~/public_gopher */
|
||||
snprintf(buf, sizeof(buf), "%s/%s", pwd->pw_dir, st->user_dir);
|
||||
if (stat(buf, &dir) == ERROR) continue;
|
||||
if ((dir.st_mode & S_IROTH) == 0) continue;
|
||||
if (dir.st_uid != pwd->pw_uid) continue;
|
||||
|
||||
/* Found one */
|
||||
snprintf(buf, sizeof(buf), USERDIR_FORMAT);
|
||||
|
||||
if (st->opt_date) {
|
||||
ltime = localtime(&dir.st_mtime);
|
||||
strftime(timestr, sizeof(timestr), DATE_FORMAT, ltime);
|
||||
|
||||
printf("1%-*.*s %s - \t/~%s/\t%s\t%i" CRLF,
|
||||
width, width, buf, timestr, pwd->pw_name,
|
||||
st->server_host, st->server_port);
|
||||
}
|
||||
else {
|
||||
printf("1%.*s\t/~%s/\t%s\t%i" CRLF, st->out_width, buf,
|
||||
pwd->pw_name, st->server_host_default, st->server_port);
|
||||
}
|
||||
}
|
||||
|
||||
endpwent();
|
||||
}
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* Print a list of available virtual hosts
|
||||
*/
|
||||
void vhostlist(state *st)
|
||||
{
|
||||
sdirent dir[MAX_SDIRENT];
|
||||
struct tm *ltime;
|
||||
char timestr[20];
|
||||
char buf[BUFSIZE];
|
||||
int width;
|
||||
int num;
|
||||
int i;
|
||||
|
||||
/* Scan the root dir for vhost dirs */
|
||||
num = sortdir(st->server_root, dir, MAX_SDIRENT);
|
||||
if (num < 0) die(st, ERR_NOTFOUND, "WTF?");
|
||||
|
||||
/* Width of filenames for fancy listing */
|
||||
width = st->out_width - DATE_WIDTH - 15;
|
||||
|
||||
/* Loop through the directory entries */
|
||||
for (i = 0; i < num; i++) {
|
||||
|
||||
/* Skip dotfiles */
|
||||
if (dir[i].name[0] == '.') continue;
|
||||
|
||||
/* Require FQDN */
|
||||
if (!strchr(dir[i].name, '.')) continue;
|
||||
|
||||
/* We only want world-readable directories */
|
||||
if ((dir[i].mode & S_IROTH) == 0) continue;
|
||||
if ((dir[i].mode & S_IFMT) != S_IFDIR) continue;
|
||||
|
||||
/* Generate display string for vhost */
|
||||
snprintf(buf, sizeof(buf), VHOST_FORMAT, dir[i].name);
|
||||
|
||||
/* Fancy listing */
|
||||
if (st->opt_date) {
|
||||
ltime = localtime(&dir[i].mtime);
|
||||
strftime(timestr, sizeof(timestr), DATE_FORMAT, ltime);
|
||||
|
||||
printf("1%-*.*s %s - \t/;%s\t%s\t%i" CRLF,
|
||||
width, width, buf, timestr, dir[i].name,
|
||||
dir[i].name, st->server_port);
|
||||
}
|
||||
|
||||
/* Teh boring version */
|
||||
else {
|
||||
printf("1%.*s\t/;%s\t%s\t%i" CRLF, st->out_width, buf,
|
||||
dir[i].name, dir[i].name, st->server_port);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Return gopher filetype for a file
|
||||
*/
|
||||
char gopher_filetype(state *st, char *file, char magic)
|
||||
{
|
||||
FILE *fp;
|
||||
char buf[BUFSIZE];
|
||||
char *c;
|
||||
int i;
|
||||
|
||||
/* If it ends with an slash it's a menu */
|
||||
if (!*file) return st->default_filetype;
|
||||
if (strlast(file) == '/') return TYPE_MENU;
|
||||
|
||||
/* Get file suffix */
|
||||
if ((c = strrchr(file, '.'))) {
|
||||
c++;
|
||||
|
||||
/* Loop through the filetype array looking for a match*/
|
||||
for (i = 0; i < st->filetype_count; i++)
|
||||
if (strcasecmp(st->filetype[i].suffix, c) == MATCH)
|
||||
return st->filetype[i].type;
|
||||
}
|
||||
|
||||
/* Are we allowed to look inside files? */
|
||||
if (!magic) return st->default_filetype;
|
||||
|
||||
/* Read data from the file */
|
||||
if ((fp = fopen(file , "r")) == NULL) return st->default_filetype;
|
||||
i = fread(buf, 1, sizeof(buf) - 1, fp);
|
||||
buf[i] = '\0';
|
||||
fclose(fp);
|
||||
|
||||
/* GIF images */
|
||||
if (sstrncmp(buf, "GIF89a") == MATCH ||
|
||||
sstrncmp(buf, "GIF87a") == MATCH) return TYPE_GIF;
|
||||
|
||||
/* JPEG images */
|
||||
if (sstrncmp(buf, "\377\330\377\340") == MATCH) return TYPE_IMAGE;
|
||||
|
||||
/* PNG images */
|
||||
if (sstrncmp(buf, "\211PNG") == MATCH) return TYPE_IMAGE;
|
||||
|
||||
/* mbox */
|
||||
if (strstr(buf, "\nFrom: ") &&
|
||||
strstr(buf, "\nSubject: ")) return TYPE_MIME;
|
||||
|
||||
/* MIME */
|
||||
if (strstr(buf, "\nContent-Type: ")) return TYPE_MIME;
|
||||
|
||||
/* HTML files */
|
||||
if (buf[0] == '<' &&
|
||||
(strstr(buf, "<html") ||
|
||||
strstr(buf, "<HTML"))) return TYPE_HTML;
|
||||
|
||||
/* PDF and PostScript */
|
||||
if (sstrncmp(buf, "%PDF-") == MATCH ||
|
||||
sstrncmp(buf, "%!") == MATCH) return TYPE_DOC;
|
||||
|
||||
/* compress and gzip */
|
||||
if (sstrncmp(buf, "\037\235\220") == MATCH ||
|
||||
sstrncmp(buf, "\037\213\010") == MATCH) return TYPE_GZIP;
|
||||
|
||||
/* Unknown content - binary or text? */
|
||||
if (memchr(buf, '\0', i)) return TYPE_BINARY;
|
||||
return st->default_filetype;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Handle gophermaps
|
||||
*/
|
||||
int gophermap(state *st, char *mapfile, int depth)
|
||||
{
|
||||
FILE *fp;
|
||||
struct stat file;
|
||||
char line[BUFSIZE];
|
||||
char *selector;
|
||||
char *name;
|
||||
char *host;
|
||||
char *c;
|
||||
char type;
|
||||
int port;
|
||||
int exe;
|
||||
|
||||
/* Prevent include loops */
|
||||
if (depth > 4) return OK;
|
||||
|
||||
/* Try to figure out whether the map is executable */
|
||||
if (stat(mapfile, &file) == OK) {
|
||||
if ((file.st_mode & S_IXOTH)) exe = TRUE;
|
||||
else exe = FALSE;
|
||||
}
|
||||
|
||||
/* As a fallback let's just feed everything to shell.. */
|
||||
else exe = TRUE;
|
||||
|
||||
/* Debug output */
|
||||
if (st->debug) {
|
||||
if (exe) syslog(LOG_INFO, "parsing executable gophermap \"%s\"", mapfile);
|
||||
else syslog(LOG_INFO, "parsing static gophermap \"%s\"", mapfile);
|
||||
}
|
||||
|
||||
/* Try to execute or open the mapfile */
|
||||
#ifdef HAVE_POPEN
|
||||
if (exe) {
|
||||
setenv_cgi(st, mapfile);
|
||||
if ((fp = popen(mapfile , "r")) == NULL) return OK;
|
||||
}
|
||||
else
|
||||
#endif
|
||||
if ((fp = fopen(mapfile , "r")) == NULL) return OK;
|
||||
|
||||
/* Read lines one by one */
|
||||
while (fgets(line, sizeof(line) - 1, fp)) {
|
||||
/* Parse type & name */
|
||||
chomp(line);
|
||||
type = line[0];
|
||||
name = line + 1;
|
||||
|
||||
/* Ignore #comments */
|
||||
if (type == '#') continue;
|
||||
|
||||
/* Stop handling gophermap? */
|
||||
if (type == '*') return OK;
|
||||
if (type == '.') return QUIT;
|
||||
|
||||
/* Print a list of users with public_gopher */
|
||||
if (type == '~') {
|
||||
#ifdef HAVE_PASSWD
|
||||
userlist(st);
|
||||
#endif
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Print a list of available virtual hosts */
|
||||
if (type == '%') {
|
||||
if (st->opt_vhost) vhostlist(st);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Hide files in menus */
|
||||
if (type == '-') {
|
||||
if (st->hidden_count < MAX_HIDDEN)
|
||||
sstrlcpy(st->hidden[st->hidden_count++], name);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Override filetype mappings */
|
||||
if (type == ':') {
|
||||
add_ftype_mapping(st, name);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Include gophermap or shell exec */
|
||||
if (type == '=') {
|
||||
gophermap(st, name, depth + 1);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Title resource */
|
||||
if (type == TYPE_TITLE) {
|
||||
info(st, name, TYPE_TITLE);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Print out non-resources as info text */
|
||||
if (!strchr(line, '\t')) {
|
||||
info(st, line, TYPE_INFO);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Parse selector */
|
||||
selector = EMPTY;
|
||||
if ((c = strchr(name, '\t'))) {
|
||||
*c = '\0';
|
||||
selector = c + 1;
|
||||
}
|
||||
if (!*selector) selector = name;
|
||||
|
||||
/* Parse host */
|
||||
host = st->server_host;
|
||||
if ((c = strchr(selector, '\t'))) {
|
||||
*c = '\0';
|
||||
host = c + 1;
|
||||
}
|
||||
|
||||
/* Parse port */
|
||||
port = st->server_port;
|
||||
if ((c = strchr(host, '\t'))) {
|
||||
*c = '\0';
|
||||
port = atoi(c + 1);
|
||||
}
|
||||
|
||||
/* Handle remote, absolute and hURL gopher resources */
|
||||
if (sstrncmp(selector, "URL:") == MATCH ||
|
||||
selector[0] == '/' ||
|
||||
host != st->server_host) {
|
||||
|
||||
printf("%c%s\t%s\t%s\t%i" CRLF, type, name,
|
||||
selector, host, port);
|
||||
}
|
||||
|
||||
/* Handle relative resources */
|
||||
else {
|
||||
printf("%c%s\t%s%s\t%s\t%i" CRLF, type, name,
|
||||
st->req_selector, selector, host, port);
|
||||
|
||||
/* Automatically hide manually defined selectors */
|
||||
#ifdef ENABLE_AUTOHIDING
|
||||
if (st->hidden_count < MAX_HIDDEN)
|
||||
sstrlcpy(st->hidden[st->hidden_count++], selector);
|
||||
#endif
|
||||
}
|
||||
}
|
||||
|
||||
/* Clean up & return */
|
||||
#ifdef HAVE_POPEN
|
||||
if (exe) pclose(fp);
|
||||
else
|
||||
#endif
|
||||
fclose(fp);
|
||||
|
||||
return QUIT;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Handle gopher menus
|
||||
*/
|
||||
void gopher_menu(state *st)
|
||||
{
|
||||
FILE *fp;
|
||||
sdirent dir[MAX_SDIRENT];
|
||||
struct tm *ltime;
|
||||
struct stat file;
|
||||
char buf[BUFSIZE];
|
||||
char pathname[BUFSIZE];
|
||||
char displayname[BUFSIZE];
|
||||
char encodedname[BUFSIZE];
|
||||
char timestr[20];
|
||||
char sizestr[20];
|
||||
char *parent;
|
||||
char *c;
|
||||
char type;
|
||||
int width;
|
||||
int num;
|
||||
int i;
|
||||
int n;
|
||||
|
||||
/* Check for a gophermap */
|
||||
snprintf(pathname, sizeof(pathname), "%s/%s",
|
||||
st->req_realpath, st->map_file);
|
||||
|
||||
if (stat(pathname, &file) == OK &&
|
||||
(file.st_mode & S_IFMT) == S_IFREG) {
|
||||
|
||||
/* Parse gophermap */
|
||||
if (gophermap(st, pathname, 0) == QUIT) {
|
||||
footer(st);
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
else {
|
||||
/* Check for a gophertag */
|
||||
snprintf(pathname, sizeof(pathname), "%s/%s",
|
||||
st->req_realpath, st->tag_file);
|
||||
|
||||
if (stat(pathname, &file) == OK &&
|
||||
(file.st_mode & S_IFMT) == S_IFREG) {
|
||||
|
||||
/* Read & output gophertag */
|
||||
if ((fp = fopen(pathname , "r"))) {
|
||||
|
||||
fgets(buf, sizeof(buf), fp);
|
||||
chomp(buf);
|
||||
|
||||
info(st, buf, TYPE_TITLE);
|
||||
info(st, EMPTY, TYPE_INFO);
|
||||
fclose(fp);
|
||||
}
|
||||
}
|
||||
|
||||
/* No gophermap or tag found - print default header */
|
||||
else if (st->opt_header) {
|
||||
|
||||
/* Use the selector as menu title */
|
||||
sstrlcpy(displayname, st->req_selector);
|
||||
|
||||
/* Shorten too long titles */
|
||||
while (strlen(displayname) > (st->out_width - sizeof(HEADER_FORMAT))) {
|
||||
if ((c = strchr(displayname, '/')) == NULL) break;
|
||||
|
||||
if (!*++c) break;
|
||||
sstrlcpy(displayname, c);
|
||||
}
|
||||
|
||||
/* Output menu title */
|
||||
snprintf(buf, sizeof(buf), HEADER_FORMAT, displayname);
|
||||
info(st, buf, TYPE_TITLE);
|
||||
info(st, EMPTY, TYPE_INFO);
|
||||
}
|
||||
}
|
||||
|
||||
/* Scan the directory */
|
||||
num = sortdir(st->req_realpath, dir, MAX_SDIRENT);
|
||||
if (num < 0) die(st, ERR_NOTFOUND, "WTF?");
|
||||
|
||||
/* Create link to parent directory */
|
||||
if (st->opt_parent) {
|
||||
sstrlcpy(buf, st->req_selector);
|
||||
parent = dirname(buf);
|
||||
|
||||
/* Root has no parent */
|
||||
if (strcmp(st->req_selector, ROOT) != MATCH) {
|
||||
|
||||
/* Prevent double-slash */
|
||||
if (strcmp(parent, ROOT) == MATCH) parent++;
|
||||
|
||||
/* Print link */
|
||||
printf("1%-*s\t%s/\t%s\t%i" CRLF,
|
||||
st->opt_date ? (st->out_width - 1) : (int) strlen(PARENT),
|
||||
PARENT, parent, st->server_host, st->server_port);
|
||||
}
|
||||
}
|
||||
|
||||
/* Width of filenames for fancy listing */
|
||||
width = st->out_width - DATE_WIDTH - 15;
|
||||
|
||||
/* Loop through the directory entries */
|
||||
for (i = 0; i < num; i++) {
|
||||
|
||||
/* Get full path+name */
|
||||
snprintf(pathname, sizeof(pathname), "%s/%s",
|
||||
st->req_realpath, dir[i].name);
|
||||
|
||||
/* Skip dotfiles and non world-readables */
|
||||
if (dir[i].name[0] == '.') continue;
|
||||
if ((dir[i].mode & S_IROTH) == 0) continue;
|
||||
|
||||
/* Skip gophermaps and tags (but not dirs) */
|
||||
if ((dir[i].mode & S_IFMT) != S_IFDIR) {
|
||||
if (strcmp(dir[i].name, st->map_file) == MATCH) continue;
|
||||
if (strcmp(dir[i].name, st->tag_file) == MATCH) continue;
|
||||
}
|
||||
|
||||
/* Skip files marked for hiding */
|
||||
for (n = 0; n < st->hidden_count; n++)
|
||||
if (strcmp(dir[i].name, st->hidden[n]) == MATCH) break;
|
||||
if (n < st->hidden_count) continue; /* Cruel hack... */
|
||||
|
||||
/* Generate display name with correct output charset */
|
||||
if (st->opt_iconv)
|
||||
sstrniconv(st->out_charset, displayname, dir[i].name);
|
||||
else
|
||||
sstrlcpy(displayname, dir[i].name);
|
||||
|
||||
/* #OCT-encode filename */
|
||||
strnencode(encodedname, dir[i].name, sizeof(encodedname));
|
||||
|
||||
/* Handle inline .gophermap */
|
||||
if (strstr(displayname, st->map_file) > displayname) {
|
||||
gophermap(st, pathname, 0);
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Handle directories */
|
||||
if ((dir[i].mode & S_IFMT) == S_IFDIR) {
|
||||
|
||||
/* Check for a gophertag */
|
||||
snprintf(buf, sizeof(buf), "%s/%s",
|
||||
pathname, st->tag_file);
|
||||
|
||||
if (stat(buf, &file) == OK &&
|
||||
(file.st_mode & S_IFMT) == S_IFREG) {
|
||||
|
||||
/* Use the gophertag as displayname */
|
||||
if ((fp = fopen(buf , "r"))) {
|
||||
|
||||
fgets(buf, sizeof(buf), fp);
|
||||
chomp(buf);
|
||||
fclose(fp);
|
||||
|
||||
/* Skip empty gophertags */
|
||||
if (*buf) {
|
||||
|
||||
/* Convert to output charset */
|
||||
if (st->opt_iconv) sstrniconv(st->out_charset, displayname, buf);
|
||||
else sstrlcpy(displayname, buf);
|
||||
}
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
/* Dir listing with dates */
|
||||
if (st->opt_date) {
|
||||
ltime = localtime(&dir[i].mtime);
|
||||
strftime(timestr, sizeof(timestr), DATE_FORMAT, ltime);
|
||||
|
||||
/* Hack to get around UTF-8 byte != char */
|
||||
n = width - strcut(displayname, width);
|
||||
strrepeat(buf, ' ', n);
|
||||
|
||||
printf("1%s%s %s - \t%s%s/\t%s\t%i" CRLF,
|
||||
displayname,
|
||||
buf,
|
||||
timestr,
|
||||
st->req_selector,
|
||||
encodedname,
|
||||
st->server_host,
|
||||
st->server_port);
|
||||
}
|
||||
|
||||
/* Regular dir listing */
|
||||
else {
|
||||
strcut(displayname, st->out_width);
|
||||
printf("1%s\t%s%s/\t%s\t%i" CRLF,
|
||||
displayname,
|
||||
st->req_selector,
|
||||
encodedname,
|
||||
st->server_host,
|
||||
st->server_port);
|
||||
}
|
||||
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Skip special files (sockets, fifos etc) */
|
||||
if ((dir[i].mode & S_IFMT) != S_IFREG) continue;
|
||||
|
||||
/* Get file type */
|
||||
type = gopher_filetype(st, pathname, st->opt_magic);
|
||||
|
||||
/* File listing with dates & sizes */
|
||||
if (st->opt_date) {
|
||||
ltime = localtime(&dir[i].mtime);
|
||||
strftime(timestr, sizeof(timestr), DATE_FORMAT, ltime);
|
||||
strfsize(sizestr, dir[i].size, sizeof(sizestr));
|
||||
|
||||
/* Hack to get around UTF-8 byte != char */
|
||||
n = width - strcut(displayname, width);
|
||||
strrepeat(buf, ' ', n);
|
||||
|
||||
printf("%c%s%s %s %s\t%s%s\t%s\t%i" CRLF, type,
|
||||
displayname,
|
||||
buf,
|
||||
timestr,
|
||||
sizestr,
|
||||
st->req_selector,
|
||||
encodedname,
|
||||
st->server_host,
|
||||
st->server_port);
|
||||
}
|
||||
|
||||
/* Regular file listing */
|
||||
else {
|
||||
strcut(displayname, st->out_width);
|
||||
printf("%c%s\t%s%s\t%s\t%i" CRLF, type,
|
||||
displayname,
|
||||
st->req_selector,
|
||||
encodedname,
|
||||
st->server_host,
|
||||
st->server_port);
|
||||
}
|
||||
}
|
||||
|
||||
/* Print footer */
|
||||
footer(st);
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,186 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Add one suffix->filetype mapping to the filetypes array
|
||||
*/
|
||||
void add_ftype_mapping(state *st, char *suffix)
|
||||
{
|
||||
char *type;
|
||||
int i;
|
||||
|
||||
/* Let's not do anything stupid */
|
||||
if (!*suffix) return;
|
||||
if (!(type = strchr(suffix, '='))) return;
|
||||
|
||||
/* Extract type from the suffix=X string */
|
||||
*type++ = '\0';
|
||||
if (!*type) return;
|
||||
|
||||
/* Loop through the filetype array */
|
||||
for (i = 0; i < st->filetype_count; i++) {
|
||||
|
||||
/* Old entry found? */
|
||||
if (strcasecmp(st->filetype[i].suffix, suffix) == MATCH) {
|
||||
st->filetype[i].type = *type;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
/* No old entry found - add new entry */
|
||||
if (i < MAX_FILETYPES) {
|
||||
sstrlcpy(st->filetype[i].suffix, suffix);
|
||||
st->filetype[i].type = *type;
|
||||
st->filetype_count++;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Add one selector rewrite mapping to the array
|
||||
*/
|
||||
void add_rewrite_mapping(state *st, char *match)
|
||||
{
|
||||
char *replace;
|
||||
|
||||
/* Check input and split it into match & replace */
|
||||
if (!*match) return;
|
||||
if (!(replace = strchr(match, '='))) return;
|
||||
|
||||
*replace++ = '\0';
|
||||
if (!*replace) return;
|
||||
|
||||
/* Insert match/replace values into the array */
|
||||
if (st->rewrite_count < MAX_REWRITE) {
|
||||
sstrlcpy(st->rewrite[st->rewrite_count].match, match);
|
||||
sstrlcpy(st->rewrite[st->rewrite_count].replace, replace);
|
||||
st->rewrite_count++;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Parse command-line arguments
|
||||
*/
|
||||
void parse_args(state *st, int argc, char *argv[])
|
||||
{
|
||||
FILE *fp;
|
||||
static const char readme[] = README;
|
||||
static const char license[] = LICENSE;
|
||||
struct stat file;
|
||||
char buf[BUFSIZE];
|
||||
int opt;
|
||||
|
||||
/* Parse args */
|
||||
while ((opt = getopt(argc, argv, "h:p:r:t:g:a:c:u:m:l:w:o:s:i:k:f:e:R:D:L:A:P:n:db?-")) != ERROR) {
|
||||
switch(opt) {
|
||||
case 'h': sstrlcpy(st->server_host, optarg); break;
|
||||
case 'p': st->server_port = atoi(optarg); break;
|
||||
case 'r': sstrlcpy(st->server_root, optarg); break;
|
||||
case 't': st->default_filetype = *optarg; break;
|
||||
case 'g': sstrlcpy(st->map_file, optarg); break;
|
||||
case 'a': sstrlcpy(st->map_file, optarg); break;
|
||||
case 'c': sstrlcpy(st->cgi_file, optarg); break;
|
||||
case 'u': sstrlcpy(st->user_dir, optarg); break;
|
||||
case 'm': /* obsolete, replaced by -l */
|
||||
case 'l': sstrlcpy(st->log_file, optarg); break;
|
||||
|
||||
case 'w': st->out_width = atoi(optarg); break;
|
||||
case 'o':
|
||||
if (sstrncasecmp(optarg, "UTF-8") == MATCH) st->out_charset = UTF_8;
|
||||
if (sstrncasecmp(optarg, "ISO-8859-1") == MATCH) st->out_charset = ISO_8859_1;
|
||||
break;
|
||||
|
||||
case 's': st->session_timeout = atoi(optarg); break;
|
||||
case 'i': st->session_max_kbytes = abs(atoi(optarg)); break;
|
||||
case 'k': st->session_max_hits = abs(atoi(optarg)); break;
|
||||
|
||||
case 'f': sstrlcpy(st->filter_dir, optarg); break;
|
||||
case 'e': add_ftype_mapping(st, optarg); break;
|
||||
|
||||
case 'R': add_rewrite_mapping(st, optarg); break;
|
||||
case 'D': sstrlcpy(st->server_description, optarg); break;
|
||||
case 'L': sstrlcpy(st->server_location, optarg); break;
|
||||
case 'A': sstrlcpy(st->server_admin, optarg); break;
|
||||
|
||||
case 'n':
|
||||
if (*optarg == 'v') { st->opt_vhost = FALSE; break; }
|
||||
if (*optarg == 'l') { st->opt_parent = FALSE; break; }
|
||||
if (*optarg == 'h') { st->opt_header = FALSE; break; }
|
||||
if (*optarg == 'f') { st->opt_footer = FALSE; break; }
|
||||
if (*optarg == 'd') { st->opt_date = FALSE; break; }
|
||||
if (*optarg == 'c') { st->opt_magic = FALSE; break; }
|
||||
if (*optarg == 'o') { st->opt_iconv = FALSE; break; }
|
||||
if (*optarg == 'q') { st->opt_query = FALSE; break; }
|
||||
if (*optarg == 's') { st->opt_syslog = FALSE; break; }
|
||||
if (*optarg == 'a') { st->opt_caps = FALSE; break; }
|
||||
if (*optarg == 'm') { st->opt_shm = FALSE; break; }
|
||||
if (*optarg == 'r') { st->opt_root = FALSE; break; }
|
||||
break;
|
||||
|
||||
case 'd': st->debug = TRUE; break;
|
||||
case 'b': puts(license); exit(EXIT_SUCCESS);
|
||||
default : puts(readme); exit(EXIT_SUCCESS);
|
||||
}
|
||||
}
|
||||
|
||||
/* Sanitize options */
|
||||
if (st->out_width > MAX_WIDTH) st->out_width = MAX_WIDTH;
|
||||
if (st->out_width < MIN_WIDTH) st->out_width = MIN_WIDTH;
|
||||
if (st->out_width < MIN_WIDTH + DATE_WIDTH) st->opt_date = FALSE;
|
||||
if (!st->opt_syslog) st->debug = FALSE;
|
||||
|
||||
/* Primary vhost directory must exist or we disable vhosting */
|
||||
if (st->opt_vhost) {
|
||||
snprintf(buf, sizeof(buf), "%s/%s", st->server_root, st->server_host);
|
||||
if (stat(buf, &file) == ERROR) st->opt_vhost = FALSE;
|
||||
}
|
||||
|
||||
/* If -D arg looks like a file load the file contents */
|
||||
if (*st->server_description == '/') {
|
||||
|
||||
if ((fp = fopen(st->server_description , "r"))) {
|
||||
fgets(st->server_description, sizeof(st->server_description), fp);
|
||||
chomp(st->server_description);
|
||||
fclose(fp);
|
||||
}
|
||||
else strclear(st->server_description);
|
||||
}
|
||||
|
||||
/* If -L arg looks like a file load the file contents */
|
||||
if (*st->server_location == '/') {
|
||||
|
||||
if ((fp = fopen(st->server_location , "r"))) {
|
||||
fgets(st->server_location, sizeof(st->server_location), fp);
|
||||
chomp(st->server_location);
|
||||
fclose(fp);
|
||||
}
|
||||
else strclear(st->server_location);
|
||||
}
|
||||
}
|
||||
|
||||
|
|
@ -0,0 +1,29 @@
|
|||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
|
||||
<plist version="1.0">
|
||||
<dict>
|
||||
<key>Label</key>
|
||||
<string>org.gophernicus.server</string>
|
||||
<key>ProgramArguments</key>
|
||||
<array>
|
||||
<string>/usr/sbin/in.gophernicus</string>
|
||||
<string>-h@HOSTNAME@</string>
|
||||
<string>-r/Library/GopherServer</string>
|
||||
</array>
|
||||
<key>Sockets</key>
|
||||
<dict>
|
||||
<key>Listeners</key>
|
||||
<dict>
|
||||
<key>SockServiceName</key>
|
||||
<string>gopher</string>
|
||||
</dict>
|
||||
</dict>
|
||||
<key>UserName</key>
|
||||
<string>nobody</string>
|
||||
<key>inetdCompatibility</key>
|
||||
<dict>
|
||||
<key>Wait</key>
|
||||
<false/>
|
||||
</dict>
|
||||
</dict>
|
||||
</plist>
|
||||
|
|
@ -0,0 +1,277 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Get OS name, version & architecture we're running on
|
||||
*/
|
||||
void platform(state *st)
|
||||
{
|
||||
#ifdef HAVE_UNAME
|
||||
#if defined(_AIX) || defined(__linux) || defined(__APPLE__)
|
||||
FILE *fp;
|
||||
#endif
|
||||
#if defined(__arm__) || defined(__mips__) || defined(__APPLE__)
|
||||
char buf[BUFSIZE];
|
||||
#endif
|
||||
#ifdef __linux
|
||||
struct stat file;
|
||||
#endif
|
||||
struct utsname name;
|
||||
char sysname[64];
|
||||
char release[64];
|
||||
char machine[64];
|
||||
char *c;
|
||||
|
||||
/* Fetch system information */
|
||||
uname(&name);
|
||||
|
||||
strclear(sysname);
|
||||
strclear(release);
|
||||
strclear(machine);
|
||||
|
||||
/* AIX-specific */
|
||||
#ifdef _AIX
|
||||
|
||||
/* Fix uname() results */
|
||||
sstrlcpy(machine, "powerpc");
|
||||
snprintf(release, sizeof(release), "%s.%s",
|
||||
name.version,
|
||||
name.release);
|
||||
|
||||
/* Get CPU type */
|
||||
if ((fp = popen("/usr/sbin/getsystype -i", "r"))) {
|
||||
fgets(machine, sizeof(machine), fp);
|
||||
pclose(fp);
|
||||
|
||||
strreplace(machine, ' ', '_');
|
||||
chomp(machine);
|
||||
}
|
||||
|
||||
/* Get hardware name using shell uname */
|
||||
if (!*st->server_description &&
|
||||
(fp = popen("/usr/bin/uname -M", "r"))) {
|
||||
|
||||
fgets(st->server_description,
|
||||
sizeof(st->server_description), fp);
|
||||
pclose(fp);
|
||||
|
||||
strreplace(st->server_description, ',', ' ');
|
||||
chomp(st->server_description);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Mac OS X, just like Unix but totally different... */
|
||||
#ifdef __APPLE__
|
||||
|
||||
/* Hardcode OS name */
|
||||
sstrlcpy(sysname, "MacOSX");
|
||||
|
||||
/* Get OS X version */
|
||||
if ((fp = popen("/usr/bin/sw_vers -productVersion", "r"))) {
|
||||
fgets(release, sizeof(release), fp);
|
||||
chomp(release);
|
||||
pclose(fp);
|
||||
}
|
||||
|
||||
/* Get hardware name */
|
||||
if (!*st->server_description &&
|
||||
(fp = popen("/usr/sbin/sysctl -n hw.model", "r"))) {
|
||||
|
||||
/* Read hardware name */
|
||||
fgets(buf, sizeof(buf), fp);
|
||||
pclose(fp);
|
||||
|
||||
/* Clones are gone now so we'll hardcode the manufacturer */
|
||||
sstrlcpy(st->server_description, "Apple ");
|
||||
sstrlcat(st->server_description, buf);
|
||||
|
||||
/* Remove hardware revision */
|
||||
for (c = st->server_description; *c; c++)
|
||||
if (*c >= '0' && *c <= '9') { *c = '\0'; break; }
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Linux uname() just says Linux/2.6 - let's dig deeper... */
|
||||
#ifdef __linux
|
||||
|
||||
/* Most Linux ARM/MIPS boards have hardware name in /proc/cpuinfo */
|
||||
#if defined(__arm__) || defined(__mips__)
|
||||
if (!*st->server_description && (fp = fopen("/proc/cpuinfo" , "r"))) {
|
||||
|
||||
while (fgets(buf, sizeof(buf), fp)) {
|
||||
#ifdef __arm__
|
||||
if ((c = strkey(buf, "Hardware"))) {
|
||||
#else
|
||||
if ((c = strkey(buf, "machine"))) {
|
||||
#endif
|
||||
sstrlcpy(st->server_description, c);
|
||||
chomp(st->server_description);
|
||||
break;
|
||||
}
|
||||
}
|
||||
fclose(fp);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Identify RedHat */
|
||||
if (!*sysname && (fp = fopen("/etc/redhat-release", "r"))) {
|
||||
fgets(sysname, sizeof(sysname), fp);
|
||||
fclose(fp);
|
||||
|
||||
if ((c = strstr(sysname, "release "))) sstrlcpy(release, c + 8);
|
||||
if ((c = strchr(release, ' '))) *c = '\0';
|
||||
|
||||
if ((c = strchr(sysname, ' '))) *c = '\0';
|
||||
if (strcmp(sysname, "Red") == MATCH) sstrlcpy(sysname, "RedHat");
|
||||
}
|
||||
|
||||
/* Identify Slackware */
|
||||
if (!*sysname && (fp = fopen("/etc/slackware-version", "r"))) {
|
||||
fgets(sysname, sizeof(sysname), fp);
|
||||
fclose(fp);
|
||||
|
||||
if ((c = strchr(sysname, ' '))) {
|
||||
sstrlcpy(release, c + 1);
|
||||
*c = '\0';
|
||||
}
|
||||
}
|
||||
|
||||
/* Uh-oh.... how about a standard Linux with lsb_release? */
|
||||
if (stat("/usr/bin/lsb_release", &file) == OK && (file.st_mode & S_IXOTH)) {
|
||||
|
||||
if (!*sysname && (fp = popen("/usr/bin/lsb_release -i -s", "r"))) {
|
||||
fgets(sysname, sizeof(sysname), fp);
|
||||
chomp(sysname);
|
||||
pclose(fp);
|
||||
}
|
||||
|
||||
if (!*release && (fp = popen("/usr/bin/lsb_release -r -s", "r"))) {
|
||||
fgets(release, sizeof(release), fp);
|
||||
chomp(release);
|
||||
pclose(fp);
|
||||
}
|
||||
}
|
||||
|
||||
/* OK, nothing worked - let's try /etc/issue for sysname */
|
||||
if (!*sysname && (fp = fopen("/etc/issue", "r"))) {
|
||||
fgets(sysname, sizeof(sysname), fp);
|
||||
fclose(fp);
|
||||
|
||||
if ((c = strchr(sysname, ' '))) *c = '\0';
|
||||
if ((c = strchr(sysname, '\\'))) *c = '\0';
|
||||
chomp(sysname);
|
||||
}
|
||||
|
||||
/* Debian version should be in /etc/debian_version */
|
||||
if (!*release && (fp = fopen("/etc/debian_version", "r"))) {
|
||||
fgets (release, sizeof(release), fp);
|
||||
fclose(fp);
|
||||
|
||||
if ((c = strchr(release, '/'))) *c = '\0';
|
||||
chomp(release);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Haiku OS */
|
||||
#ifdef __HAIKU__
|
||||
|
||||
/* Fix release name */
|
||||
snprintf(release, sizeof(release), "R%s", name.release);
|
||||
#endif
|
||||
|
||||
/* Fill in the blanks using uname() data */
|
||||
if (!*sysname) sstrlcpy(sysname, name.sysname);
|
||||
if (!*release) sstrlcpy(release, name.release);
|
||||
if (!*machine) sstrlcpy(machine, name.machine);
|
||||
|
||||
/* We're only interested in major.minor version */
|
||||
if ((c = strchr(release, '.'))) if ((c = strchr(c + 1, '.'))) *c = '\0';
|
||||
if ((c = strchr(release, '-'))) *c = '\0';
|
||||
if ((c = strchr(release, '/'))) *c = '\0';
|
||||
|
||||
/* Create a nicely formatted platform string */
|
||||
snprintf(st->server_platform, sizeof(st->server_platform), "%s/%s %s",
|
||||
sysname,
|
||||
#if defined(__OpenBSD__) || defined(__FreeBSD__) || defined(__NetBSD__)
|
||||
machine,
|
||||
release);
|
||||
#else
|
||||
release,
|
||||
machine);
|
||||
#endif
|
||||
|
||||
/* Debug */
|
||||
if (st->debug) {
|
||||
syslog(LOG_INFO, "generated platform string \"%s\"",
|
||||
st->server_platform);
|
||||
}
|
||||
|
||||
#else
|
||||
/* Fallback reply */
|
||||
sstrlcpy(st->server_platform, "Unknown computer-like system");
|
||||
#endif
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Return current CPU load
|
||||
*/
|
||||
float loadavg(void)
|
||||
{
|
||||
FILE *fp;
|
||||
char buf[BUFSIZE];
|
||||
|
||||
/* Faster Linux version */
|
||||
#ifdef __linux
|
||||
buf[0] = '\0';
|
||||
if ((fp = fopen("/proc/loadavg" , "r")) == NULL) return 0;
|
||||
fgets(buf, sizeof(buf), fp);
|
||||
fclose(fp);
|
||||
|
||||
return (float) atof(buf);
|
||||
|
||||
/* Generic slow version - parse the output of uptime */
|
||||
#else
|
||||
#ifdef HAVE_POPEN
|
||||
char *c;
|
||||
|
||||
if ((fp = popen("/usr/bin/uptime", "r"))) {
|
||||
fgets(buf, sizeof(buf), fp);
|
||||
pclose(fp);
|
||||
|
||||
if ((c = strstr(buf, "average: ")) || (c = strstr(buf, "averages: ")))
|
||||
return (float) atof(c + 10);
|
||||
}
|
||||
#endif
|
||||
|
||||
/* Fallback reply */
|
||||
return 0;
|
||||
#endif
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,144 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Locate shared memory session ID
|
||||
*/
|
||||
#ifdef HAVE_SHMEM
|
||||
int get_shm_session_id(state *st, shm_state *shm)
|
||||
{
|
||||
time_t now;
|
||||
int i;
|
||||
|
||||
/* Get current time */
|
||||
now = time(NULL);
|
||||
|
||||
/* Locate user's old session using remote_addr */
|
||||
for (i = 0; i < SHM_SESSIONS; i++) {
|
||||
if (strcmp(st->req_remote_addr, shm->session[i].req_remote_addr) == MATCH &&
|
||||
(now - shm->session[i].req_atime) < st->session_timeout) break;
|
||||
}
|
||||
|
||||
/* Return -1 on error */
|
||||
if (i == SHM_SESSIONS) return ERROR;
|
||||
else return i;
|
||||
}
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* Get shared memory session data
|
||||
*/
|
||||
#ifdef HAVE_SHMEM
|
||||
void get_shm_session(state *st, shm_state *shm)
|
||||
{
|
||||
int i;
|
||||
|
||||
/* Get session id */
|
||||
if ((i = get_shm_session_id(st, shm)) == ERROR) return;
|
||||
|
||||
/* Get session data */
|
||||
if (st->opt_vhost) {
|
||||
sstrlcpy(st->server_host, shm->session[i].server_host);
|
||||
st->server_port = shm->session[i].server_port;
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
|
||||
/*
|
||||
* Update shared memory session data
|
||||
*/
|
||||
#ifdef HAVE_SHMEM
|
||||
void update_shm_session(state *st, shm_state *shm)
|
||||
{
|
||||
time_t now;
|
||||
char buf[BUFSIZE];
|
||||
int delay;
|
||||
int i;
|
||||
|
||||
/* Get current time */
|
||||
now = time(NULL);
|
||||
|
||||
/* No existing session found? */
|
||||
if ((i = get_shm_session_id(st, shm)) == ERROR) {
|
||||
|
||||
/* Look for an empty/expired session slot */
|
||||
for (i = 0; i < SHM_SESSIONS; i++) {
|
||||
|
||||
if ((now - shm->session[i].req_atime) > st->session_timeout) {
|
||||
|
||||
/* Found slot -> initialize it */
|
||||
sstrlcpy(shm->session[i].req_remote_addr, st->req_remote_addr);
|
||||
shm->session[i].hits = 0;
|
||||
shm->session[i].kbytes = 0;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/* No available session slot found? */
|
||||
if (i == SHM_SESSIONS) return;
|
||||
|
||||
/* Get referrer from old session data */
|
||||
if (*shm->session[i].server_host) {
|
||||
snprintf(buf, sizeof(buf), "gopher://%s:%i/%c%s",
|
||||
shm->session[i].server_host,
|
||||
shm->session[i].server_port,
|
||||
shm->session[i].req_filetype,
|
||||
shm->session[i].req_selector);
|
||||
sstrlcpy(st->req_referrer, buf);
|
||||
}
|
||||
|
||||
/* Update session data */
|
||||
sstrlcpy(shm->session[i].server_host, st->server_host);
|
||||
shm->session[i].server_port = st->server_port;
|
||||
|
||||
sstrlcpy(shm->session[i].req_selector, st->req_selector);
|
||||
shm->session[i].req_filetype = st->req_filetype;
|
||||
shm->session[i].req_atime = now;
|
||||
|
||||
shm->session[i].hits++;
|
||||
shm->session[i].kbytes += st->req_filesize / 1024;
|
||||
|
||||
/* Transfer limits exceeded? */
|
||||
if ((st->session_max_kbytes && shm->session[i].kbytes > st->session_max_kbytes) ||
|
||||
(st->session_max_hits && shm->session[i].hits > st->session_max_hits)) {
|
||||
|
||||
/* Calculate throttle delay */
|
||||
delay = max(shm->session[i].kbytes / st->session_max_kbytes,
|
||||
shm->session[i].hits / st->session_max_hits);
|
||||
|
||||
/* Throttle user */
|
||||
syslog(LOG_INFO, "throttling user from %s for %i seconds",
|
||||
st->req_remote_addr, delay);
|
||||
sleep(delay);
|
||||
}
|
||||
}
|
||||
#endif
|
||||
|
||||
|
|
@ -0,0 +1,416 @@
|
|||
/*
|
||||
* Gophernicus - Copyright (c) 2009-2012 Kim Holviala <kim@holviala.com>
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions are met:
|
||||
* * Redistributions of source code must retain the above copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* * Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
||||
* DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
||||
* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
||||
* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
||||
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
||||
* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
||||
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
||||
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
|
||||
#include "gophernicus.h"
|
||||
|
||||
|
||||
/*
|
||||
* Repeat a character num times and zero-terminate
|
||||
*/
|
||||
void strrepeat(char *dest, char c, size_t num)
|
||||
{
|
||||
memset(dest, c, num);
|
||||
dest[num] = '\0';
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Replace characters in-place
|
||||
*/
|
||||
void strreplace(char *str, char from, char to)
|
||||
{
|
||||
while (*str) {
|
||||
if (*str == from) *str = to;
|
||||
str++;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Cut string to width, return resulting width (UTF-8 aware)
|
||||
*/
|
||||
int strcut(char *str, size_t width)
|
||||
{
|
||||
unsigned char c;
|
||||
int w = 0;
|
||||
int i;
|
||||
|
||||
while (width-- && (c = *str++)) {
|
||||
if (c >= 0x80 && (*str & 0xc0) == 0x80) {
|
||||
i = 0;
|
||||
|
||||
if ((c & 0xf8) == 0xf0) i = 3;
|
||||
else if ((c & 0xf0) == 0xe0) i = 2;
|
||||
else if ((c & 0xe0) == 0xc0) i = 1;
|
||||
|
||||
while (i--) if (!*str++) break;
|
||||
}
|
||||
|
||||
w++;
|
||||
}
|
||||
|
||||
*str = '\0';
|
||||
return w;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Match key and return value (key: value)
|
||||
*/
|
||||
char *strkey(char *header, char *key)
|
||||
{
|
||||
char *c;
|
||||
size_t len;
|
||||
|
||||
if ((len = strlen(key)) == 0) return NULL;
|
||||
|
||||
if (strncasecmp(header, key, len) == MATCH) {
|
||||
c = header + len;
|
||||
do { c++; } while (*c == ' ' || *c == '\t');
|
||||
|
||||
if (*c != ':') return NULL;
|
||||
|
||||
do { c++; } while (*c == ' ' || *c == '\t');
|
||||
return c;
|
||||
}
|
||||
|
||||
return NULL;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Return last character of a string
|
||||
*/
|
||||
char strlast(char *str)
|
||||
{
|
||||
int len;
|
||||
|
||||
if ((len = (int)strlen(str) - 1) >= 0) return str[len];
|
||||
else return 0;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Remove CRLF from a string
|
||||
*/
|
||||
void chomp(char *str)
|
||||
{
|
||||
char *c;
|
||||
|
||||
if ((c = strrchr(str, '\n'))) *c = '\0';
|
||||
if ((c = strrchr(str, '\r'))) *c = '\0';
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Return charset name
|
||||
*/
|
||||
char *strcharset(int charset)
|
||||
{
|
||||
if (charset == AUTO) return "auto";
|
||||
if (charset == US_ASCII) return "US-ASCII";
|
||||
if (charset == ISO_8859_1) return "ISO-8859-1";
|
||||
if (charset == UTF_8) return "UTF-8";
|
||||
|
||||
return "(unknown)";
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Convert a string between UTF-8, ISO-8859-1 and US-ASCII
|
||||
*/
|
||||
void strniconv(int charset, char *out, char *in, size_t outsize)
|
||||
{
|
||||
char ascii[] = ASCII;
|
||||
unsigned long c;
|
||||
size_t len;
|
||||
int i;
|
||||
|
||||
/* Loop through the input string */
|
||||
len = strlen(in);
|
||||
while (--outsize && len > 0) {
|
||||
|
||||
/* Get one input char */
|
||||
c = (unsigned char) *in++;
|
||||
len--;
|
||||
|
||||
/* 7-bit chars are the same in all three charsets */
|
||||
if (c < 0x80) {
|
||||
*out++ = (unsigned char) c;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Assume ISO-8859-1 which requires 0 extra bytes */
|
||||
i = 0;
|
||||
|
||||
/* UTF-8? (We'll actually check the next char here, not current) */
|
||||
if ((*in & 0xc0) == 0x80) {
|
||||
|
||||
/* Four-byte UTF-8? */
|
||||
if ((c & 0xf8) == 0xf0 && len >= 3) { c &= 0x07; i = 3; }
|
||||
|
||||
/* Three-byte UTF-8? */
|
||||
else if ((c & 0xf0) == 0xe0 && len >= 2) { c &= 0x0f; i = 2; }
|
||||
|
||||
/* Two-byte UTF-8? */
|
||||
else if ((c & 0xe0) == 0xc0 && len >= 1) { c &= 0x1f; i = 1; }
|
||||
|
||||
/* Parse rest of the UTF-8 bytes */
|
||||
while (i--) {
|
||||
c <<= 6;
|
||||
c |= *in++ & 0x3f;
|
||||
len--;
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* At this point we've got one 32bit UTF character in c and
|
||||
* we're ready to convert it to the specified output charset
|
||||
*/
|
||||
|
||||
/* Handle UTF-8 */
|
||||
if (charset == UTF_8) {
|
||||
i = 0;
|
||||
|
||||
/* Two-byte encoding? */
|
||||
if (c < 0x800 && outsize > 2) { *out++ = (c >> 6) | 0xc0; i = 1; }
|
||||
|
||||
/* Three-byte encoding? */
|
||||
else if (c < 0x10000 && outsize > 3) { *out++ = (c >> 12) | 0xe0; i = 2; }
|
||||
|
||||
/* Four-byte encoding? */
|
||||
else if (c < 0x110000 && outsize > 4) { *out++ = (c >> 18) | 0xf0; i = 3; }
|
||||
|
||||
/* Encode rest of the UTF-8 bytes */
|
||||
while (i--) {
|
||||
*out++ = ((c >> (i * 6)) & 0x3f) | 0x80;
|
||||
outsize--;
|
||||
}
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Handle ISO-8859-1 */
|
||||
if (charset == ISO_8859_1) {
|
||||
|
||||
if (c >= 0xa0 && c <= 0xff)
|
||||
*out++ = (unsigned char) c;
|
||||
else
|
||||
*out++ = UNKNOWN;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Handle all other charsets as 7-bit US-ASCII */
|
||||
if (c >= 0x80 && c <= 0xff)
|
||||
*out++ = ascii[c - 0x80];
|
||||
else
|
||||
*out++ = UNKNOWN;
|
||||
}
|
||||
|
||||
/* Zero-terminate output */
|
||||
*out = '\0';
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Encode string with #OCT encoding
|
||||
*/
|
||||
void strnencode(char *out, const char *in, size_t outsize)
|
||||
{
|
||||
unsigned char c;
|
||||
|
||||
/* Loop through the input string */
|
||||
while (--outsize) {
|
||||
|
||||
/* End of source? */
|
||||
if (!(c = *in++)) break;
|
||||
|
||||
/* Need to encode the char? */
|
||||
if (c < '+' || c > '~') {
|
||||
|
||||
/* Can we fit the encoded version into outbuffer? */
|
||||
if (outsize < 5) break;
|
||||
|
||||
/* Output encoded char */
|
||||
snprintf(out, outsize, "#%.3o", c);
|
||||
out += 4;
|
||||
}
|
||||
|
||||
/* Copy regular chars */
|
||||
else *out++ = c;
|
||||
}
|
||||
|
||||
/* Zero-terminate output */
|
||||
*out = '\0';
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Decode both %HEX and #OCT encodings
|
||||
*/
|
||||
void strndecode(char *out, char *in, size_t outsize)
|
||||
{
|
||||
unsigned char c;
|
||||
unsigned int i;
|
||||
|
||||
/* Loop through the input string */
|
||||
while (--outsize) {
|
||||
|
||||
/* End of source? */
|
||||
if (!(c = *in++)) break;
|
||||
|
||||
/* Parse %hex encoding */
|
||||
if (c == '%' && strlen(in) >= 2) {
|
||||
sscanf(in, "%2x", &i);
|
||||
*out++ = i;
|
||||
in += 2;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Parse #octal encoding */
|
||||
if (c == '#' && strlen(in) >= 3) {
|
||||
sscanf(in, "%3o", &i);
|
||||
*out++ = i;
|
||||
in += 3;
|
||||
continue;
|
||||
}
|
||||
|
||||
/* Copy non-encoded chars */
|
||||
*out++ = c;
|
||||
}
|
||||
|
||||
/* Zero-terminate output */
|
||||
*out = '\0';
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Format number to human-readable filesize with unit
|
||||
*/
|
||||
void strfsize(char *out, off_t size, size_t outsize)
|
||||
{
|
||||
static char *unit[] = { UNITS };
|
||||
int u;
|
||||
float s;
|
||||
|
||||
/* Start with kilobytes */
|
||||
s = ((float) size) / 1024;
|
||||
u = 0;
|
||||
|
||||
/* Loop through the units until the size is small enough */
|
||||
while (s >= 1000 && unit[(u + 1)]) {
|
||||
s = s / 1024;
|
||||
u++;
|
||||
}
|
||||
|
||||
/* Format size */
|
||||
snprintf(out, outsize, "%7.1f %s", s, unit[u]);
|
||||
}
|
||||
|
||||
|
||||
#ifndef HAVE_STRLCPY
|
||||
/*
|
||||
* Copyright (c) 1998 Todd C. Miller <Todd.Miller@courtesan.com>
|
||||
*
|
||||
* Permission to use, copy, modify, and distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*/
|
||||
|
||||
#include <sys/types.h>
|
||||
#include <string.h>
|
||||
|
||||
/*
|
||||
* Copy src to string dst of size siz. At most siz-1 characters
|
||||
* will be copied. Always NUL terminates (unless siz == 0).
|
||||
* Returns strlen(src); if retval >= siz, truncation occurred.
|
||||
*/
|
||||
size_t strlcpy(char *dst, const char *src, size_t siz)
|
||||
{
|
||||
char *d = dst;
|
||||
const char *s = src;
|
||||
size_t n = siz;
|
||||
|
||||
/* Copy as many bytes as will fit */
|
||||
if (n != 0) {
|
||||
while (--n != 0) {
|
||||
if ((*d++ = *s++) == '\0')
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
/* Not enough room in dst, add NUL and traverse rest of src */
|
||||
if (n == 0) {
|
||||
if (siz != 0)
|
||||
*d = '\0'; /* NUL-terminate dst */
|
||||
while (*s++)
|
||||
;
|
||||
}
|
||||
|
||||
return(s - src - 1); /* count does not include NUL */
|
||||
}
|
||||
|
||||
/*
|
||||
* Appends src to string dst of size siz (unlike strncat, siz is the
|
||||
* full size of dst, not space left). At most siz-1 characters
|
||||
* will be copied. Always NUL terminates (unless siz <= strlen(dst)).
|
||||
* Returns strlen(src) + MIN(siz, strlen(initial dst)).
|
||||
* If retval >= siz, truncation occurred.
|
||||
*/
|
||||
size_t strlcat(char *dst, const char *src, size_t siz)
|
||||
{
|
||||
char *d = dst;
|
||||
const char *s = src;
|
||||
size_t n = siz;
|
||||
size_t dlen;
|
||||
|
||||
/* Find the end of dst and adjust bytes left but don't go past end */
|
||||
while (n-- != 0 && *d != '\0')
|
||||
d++;
|
||||
dlen = d - dst;
|
||||
n = siz - dlen;
|
||||
|
||||
if (n == 0)
|
||||
return(dlen + strlen(s));
|
||||
while (*s != '\0') {
|
||||
if (n != 1) {
|
||||
*d++ = *s;
|
||||
n--;
|
||||
}
|
||||
s++;
|
||||
}
|
||||
*d = '\0';
|
||||
|
||||
return(dlen + (s - src)); /* count does not include NUL */
|
||||
}
|
||||
|
||||
#endif
|
||||
Loading…
Reference in New Issue