18462SApril.Chin@Sun.COM#!/usr/bin/ksh93 28462SApril.Chin@Sun.COM 38462SApril.Chin@Sun.COM# 48462SApril.Chin@Sun.COM# CDDL HEADER START 58462SApril.Chin@Sun.COM# 68462SApril.Chin@Sun.COM# The contents of this file are subject to the terms of the 78462SApril.Chin@Sun.COM# Common Development and Distribution License (the "License"). 88462SApril.Chin@Sun.COM# You may not use this file except in compliance with the License. 98462SApril.Chin@Sun.COM# 108462SApril.Chin@Sun.COM# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 118462SApril.Chin@Sun.COM# or http://www.opensolaris.org/os/licensing. 128462SApril.Chin@Sun.COM# See the License for the specific language governing permissions 138462SApril.Chin@Sun.COM# and limitations under the License. 148462SApril.Chin@Sun.COM# 158462SApril.Chin@Sun.COM# When distributing Covered Code, include this CDDL HEADER in each 168462SApril.Chin@Sun.COM# file and include the License file at usr/src/OPENSOLARIS.LICENSE. 178462SApril.Chin@Sun.COM# If applicable, add the following below this CDDL HEADER, with the 188462SApril.Chin@Sun.COM# fields enclosed by brackets "[]" replaced with your own identifying 198462SApril.Chin@Sun.COM# information: Portions Copyright [yyyy] [name of copyright owner] 208462SApril.Chin@Sun.COM# 218462SApril.Chin@Sun.COM# CDDL HEADER END 228462SApril.Chin@Sun.COM# 238462SApril.Chin@Sun.COM 248462SApril.Chin@Sun.COM# 25*12068SRoger.Faulkner@Oracle.COM# Copyright (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved. 268462SApril.Chin@Sun.COM# 278462SApril.Chin@Sun.COM 288462SApril.Chin@Sun.COM# Solaris needs /usr/xpg6/bin:/usr/xpg4/bin because the tools in /usr/bin are not POSIX-conformant 298462SApril.Chin@Sun.COMexport PATH=/usr/xpg6/bin:/usr/xpg4/bin:/bin:/usr/bin 308462SApril.Chin@Sun.COM 318462SApril.Chin@Sun.COM# Make sure all math stuff runs in the "C" locale to avoid problems 328462SApril.Chin@Sun.COM# with alternative # radix point representations (e.g. ',' instead of 338462SApril.Chin@Sun.COM# '.' in de_DE.*-locales). This needs to be set _before_ any 348462SApril.Chin@Sun.COM# floating-point constants are defined in this script). 358462SApril.Chin@Sun.COMif [[ "${LC_ALL}" != "" ]] ; then 368462SApril.Chin@Sun.COM export \ 378462SApril.Chin@Sun.COM LC_MONETARY="${LC_ALL}" \ 388462SApril.Chin@Sun.COM LC_MESSAGES="${LC_ALL}" \ 398462SApril.Chin@Sun.COM LC_COLLATE="${LC_ALL}" \ 408462SApril.Chin@Sun.COM LC_CTYPE="${LC_ALL}" 418462SApril.Chin@Sun.COM unset LC_ALL 428462SApril.Chin@Sun.COMfi 438462SApril.Chin@Sun.COMexport LC_NUMERIC=C 448462SApril.Chin@Sun.COM 458462SApril.Chin@Sun.COMfunction fatal_error 468462SApril.Chin@Sun.COM{ 478462SApril.Chin@Sun.COM print -u 2 "${progname}: $@" 488462SApril.Chin@Sun.COM exit 1 498462SApril.Chin@Sun.COM} 508462SApril.Chin@Sun.COM 518462SApril.Chin@Sun.COM 528462SApril.Chin@Sun.COMfunction usage 538462SApril.Chin@Sun.COM{ 548462SApril.Chin@Sun.COM OPTIND=0 558462SApril.Chin@Sun.COM getopts -a "${progname}" "${multifollow_usage}" OPT '-?' 568462SApril.Chin@Sun.COM exit 2 578462SApril.Chin@Sun.COM} 588462SApril.Chin@Sun.COM 598462SApril.Chin@Sun.COM# program start 608462SApril.Chin@Sun.COMbuiltin basename 618462SApril.Chin@Sun.COMbuiltin cat 628462SApril.Chin@Sun.COM 638462SApril.Chin@Sun.COMtypeset progname="$(basename "${0}")" 648462SApril.Chin@Sun.COM 658462SApril.Chin@Sun.COMtypeset -r multifollow_usage=$'+ 6610898Sroland.mainz@nrubsig.org[-?\n@(#)\$Id: multifollow (Roland Mainz) 2009-04-08 \$\n] 678462SApril.Chin@Sun.COM[-author?Roland Mainz <roland.mainz@nrubsig.org>] 688462SApril.Chin@Sun.COM[+NAME?multifollow - use tail -f on multiple files] 698462SApril.Chin@Sun.COM[+DESCRIPTION?\bmultifollow\b is a small utilty which can "follow" multiple 708462SApril.Chin@Sun.COM files similar to tail -f.] 718462SApril.Chin@Sun.COM 728462SApril.Chin@Sun.COM[ file ... ] 738462SApril.Chin@Sun.COM 748462SApril.Chin@Sun.COM[+SEE ALSO?\bksh93\b(1), \btail\b(1)] 758462SApril.Chin@Sun.COM' 768462SApril.Chin@Sun.COM 778462SApril.Chin@Sun.COMwhile getopts -a "${progname}" "${multifollow_usage}" OPT ; do 788462SApril.Chin@Sun.COM# printmsg "## OPT=|${OPT}|, OPTARG=|${OPTARG}|" 798462SApril.Chin@Sun.COM case ${OPT} in 808462SApril.Chin@Sun.COM *) usage ;; 818462SApril.Chin@Sun.COM esac 828462SApril.Chin@Sun.COMdone 838462SApril.Chin@Sun.COMshift $((OPTIND-1)) 848462SApril.Chin@Sun.COM 858462SApril.Chin@Sun.COM# expecting at least one more arguments 868462SApril.Chin@Sun.COM(($# >= 1)) || usage 878462SApril.Chin@Sun.COM 888462SApril.Chin@Sun.COMbuiltin -f libshell.so.1 poll || fatal_error "poll builtin not found." 898462SApril.Chin@Sun.COM 908462SApril.Chin@Sun.COMtypeset -a files 918462SApril.Chin@Sun.COMinteger numfiles=0 928462SApril.Chin@Sun.COMinteger i 938462SApril.Chin@Sun.COM 948462SApril.Chin@Sun.COM# register trap to cleanup child processes 958462SApril.Chin@Sun.COMtrap 'for ((i=0 ; i < numfiles ; i++ )) ; do kill -TERM ${files[i].childpid} ; done' EXIT 968462SApril.Chin@Sun.COM 978462SApril.Chin@Sun.COM# setup "tail -f" childs, FIFOs and information for the "poll" builtin 988462SApril.Chin@Sun.COMfor (( ; $# > 0 ; numfiles++ )) ; do 998462SApril.Chin@Sun.COM typeset files[${numfiles}]=( 1008462SApril.Chin@Sun.COM typeset name="$1" 1018462SApril.Chin@Sun.COM typeset pipename="/tmp/multifollow_pipe_${PPID}_$$_${numfiles}" 1028462SApril.Chin@Sun.COM integer childpid=-1 1038462SApril.Chin@Sun.COM 1048462SApril.Chin@Sun.COM # poll(1) information 1058462SApril.Chin@Sun.COM integer fd="-1" 1068462SApril.Chin@Sun.COM typeset events="POLLIN" 1078462SApril.Chin@Sun.COM typeset revents="" 1088462SApril.Chin@Sun.COM ) 1098462SApril.Chin@Sun.COM 1108462SApril.Chin@Sun.COM mkfifo "${files[${numfiles}].pipename}" 11110898Sroland.mainz@nrubsig.org redirect {files[numfiles].fd}<> "${files[numfiles].pipename}" 1128462SApril.Chin@Sun.COM 1138462SApril.Chin@Sun.COM tail -f "${files[${numfiles}].name}" >"${files[${numfiles}].pipename}" & 1148462SApril.Chin@Sun.COM files[${numfiles}].childpid=$! 1158462SApril.Chin@Sun.COM 1168462SApril.Chin@Sun.COM rm "${files[${numfiles}].pipename}" 1178462SApril.Chin@Sun.COM 1188462SApril.Chin@Sun.COM shift 1198462SApril.Chin@Sun.COMdone 1208462SApril.Chin@Sun.COM 1218462SApril.Chin@Sun.COMtypeset do_poll=true 1228462SApril.Chin@Sun.COM 1238462SApril.Chin@Sun.COM# event loop 1248462SApril.Chin@Sun.COMwhile true ; do 1258462SApril.Chin@Sun.COM if ${do_poll} ; then 1268462SApril.Chin@Sun.COM for ((i=0 ; i < numfiles ; i++ )) ; do 1278462SApril.Chin@Sun.COM files[i].revents="" 1288462SApril.Chin@Sun.COM done 1298462SApril.Chin@Sun.COM poll files 1308462SApril.Chin@Sun.COM fi 1318462SApril.Chin@Sun.COM do_poll=true 1328462SApril.Chin@Sun.COM 1338462SApril.Chin@Sun.COM for ((i=0 ; i < numfiles ; i++ )) ; do 1348462SApril.Chin@Sun.COM if [[ "${files[i].revents}" != "" ]] ; then 1358462SApril.Chin@Sun.COM # todo: investigate why we have to use "do_poll" at all - AFAIK it 1368462SApril.Chin@Sun.COM # should be sufficient to call "poll" and get "revents" set if there 1378462SApril.Chin@Sun.COM # are any remaining data... 1388462SApril.Chin@Sun.COM if read -t0 -u${files[i].fd} line ; then 1398462SApril.Chin@Sun.COM print -- "#${i}: ${line}" 1408462SApril.Chin@Sun.COM do_poll=false 1418462SApril.Chin@Sun.COM fi 1428462SApril.Chin@Sun.COM fi 1438462SApril.Chin@Sun.COM done 1448462SApril.Chin@Sun.COMdone 1458462SApril.Chin@Sun.COM 1468462SApril.Chin@Sun.COMfatal_error "not reached." 1478462SApril.Chin@Sun.COM# EOF. 148