[root@case.net.ru]$ cd /usr/ports/dns/opendd
[root@case.net.ru]$ make showconfig
===> The following configuration options are available for opendd-0.7.9:
     OPENDD_SSL=off "Build with SSL support"
     RC_NG=on "Install RC_NG script"
===> Use 'make config' to modify these settings
[root@case.net.ru]$ portinstall opendd

servername = members.dyndns.org
hostname = case.selfip.net
username = [username]
password = [password]
use_ssl = 0
cert_path = /usr/local/etc/opendd/opendd.pem
iface = ng0
runasdaemon = 1
use_syslog = 1
syslog_facility = daemon
system_user = nobody
system_group = nogroup
pidfile_path = /var/run/opendd.pid
pollfrequency = 300
domain_lifetime = 28
wildcard = 1
mx = mx.case.net.ru
backupmx = 1
offline = 0
mailfrom = opendd@case.net.ru
mailto = root@case.net.ru
smtpservername = localhost

[root@case.net.ru]$ cat /usr/local/etc/mpd4/up_stream.sh | grep opendd
/usr/local/etc/rc.d/opendd forcestart
[root@case.net.ru]$ cat /usr/local/etc/mpd4/down_stream.sh | grep opendd
/usr/local/etc/rc.d/opendd forcestop
[root@case.net.ru]$

portinstall balance

balance_enable="YES"
balance_hosts="web"
balance_web_flags="-a"
balance_web_address="80.92.110.82"
balance_web_ports="80"
balance_web_targets="172.16.127.10:80 172.16.127.11:80"

  MAKE_ARGS = {
        'editors/vim' => 'WITHOUT_X11=1',
  }

# portinstall vim

set title
set fdm=marker
set shiftwidth=4
set ts=4
set ruler
au BufReadPost * if line("'"") > 0 && line("'"") <= line("$") | exe "normal g'"" | endif
syntax on
set nomodeline

$ apcaccess
APC      : 001,043,1101
DATE     : Tue Feb 24 19:52:09 MSK 2009
HOSTNAME : case.net.ru
RELEASE  : 3.14.5
VERSION  : 3.14.5 (10 January 2009) freebsd
UPSNAME  : case.net.ru
CABLE    : USB Cable
MODEL    : Smart-UPS 1000 XL
UPSMODE  : Stand Alone
STARTTIME: Tue Feb 24 14:38:38 MSK 2009
STATUS   : ONLINE
LINEV    : 220.3 Volts
LOADPCT  :  14.3 Percent Load Capacity
BCHARGE  : 100.0 Percent
TIMELEFT : 829.0 Minutes
MBATTCHG : 5 Percent
MINTIMEL : 3 Minutes
MAXTIME  : 0 Seconds
OUTPUTV  : 220.3 Volts
SENSE    : High
DWAKE    : -01 Seconds
DSHUTD   : 180 Seconds
LOTRANS  : 200.0 Volts
HITRANS  : 253.0 Volts
RETPCT   : 000.0 Percent
ITEMP    : 27.9 C Internal
ALARMDEL : Always
BATTV    : 27.5 Volts
LINEFREQ : 50.0 Hz
LASTXFER : Low line voltage
NUMXFERS : 1
XONBATT  : Tue Feb 24 14:46:34 MSK 2009
TONBATT  : 0 seconds
CUMONBATT: 272 seconds
XOFFBATT : Tue Feb 24 14:51:06 MSK 2009
SELFTEST : NO
STATFLAG : 0x07000008 Status Flag
SERIALNO : AS0303330928
BATTDATE : 2006-10-06
NOMOUTV  : 230 Volts
NOMBATTV :  24.0 Volts
FIRMWARE : 631.3.I USB FW:1.5
APCMODEL : Smart-UPS 1000 XL
END APC  : Tue Feb 24 19:52:20 MSK 2009

#!/bin/sh
/usr/local/sbin/apcaccess | /usr/bin/grep -e ITEMP -e BCHARGE -e TIMELEFT -e LINEV -e OUTPUTV -e LOADPCT | /usr/bin/tr "n" " " | /usr/bin/awk -F' ' '{print $1 ":" $3 " " $5 ":" $7 " " $11 ":" $13 " " $15 ":" $17 " " $19 ":" $21 " " $23 ":" $25}'

LINEV:221.7 LOADPCT:13.6 BCHARGE:100.0 TIMELEFT:829.0 OUTPUTV:221.7 ITEMP:27.9

aRange = {
["127.0.0.1-127.0.0.255"] = 1,
["10.128.0.1-10.128.255.254"] = 1,
["10.129.0.1-10.129.255.254"] = 1,
["10.130.0.1-10.130.255.254"] = 1,
["192.168.0.1-192.168.255.254"] = 1,
["213.79.108.1-213.79.111.254"] = 1,
["172.16.127.1-172.16.127.255"] = 1,
}
 
function VH_OnParsedMsgSearch(nick,data)
 
    res, myinfo = VH:GetMyINFO(nick)
    _, _, sharess = string.find(myinfo,"(%d+)$$")
    _, ip = VH:GetUserIP(nick)
 
    local Allow,Range = Func.CheckIP(GetIP(nick))
 
    if (Allow == 0) then
        VH:SendDataToUser("$To: Case From: Verlihub $<VerliHub> user: "..nick..", data: "..data.."", "Case")
        return 0
    else
        VH:SendDataToUser("$To: Case From: Verlihub $<VerliHub> user: "..nick..", data: "..data.."", "Case")
        return 1
    end
end
 
Func = {}
 
Func.ComIP = function(curIP)
    local _,_,a,b,c,d = string.find(curIP, "(%d+).(%d+).(%d+).(%d+)")
    return a*16777216 + b*65536 + c*256 + d
end
 
Func.CheckIP = function(curIP)
    local _,_,a,b,c,d = string.find(curIP, "(%d*).(%d*).(%d*).(%d*)")
    if ( tonumber(a) and tonumber(b) and tonumber(c) and tonumber(d) ) then
        local UserIP = Func.ComIP(curIP)
        if UserIP then
            for Range, Table in pairs(aRange) do
                local _,_,R1,R2 = string.find(Range, "(%S+)-(%S+)")
                Range1 = Func.ComIP(R1)
                Range2 = Func.ComIP(R2)
                if UserIP >= Range1 and UserIP <= Range2 then
                    return 1,Range
                end
            end
        end
    end
    return 0
end
 
function GetIP(sNick)
    res, ip = VH:GetUserIP(sNick)
    return ip
end

!luaload /usr/local/etc/verlihub/scripts/search.lua

daemon on
process_id_file /var/run/motion.pid 
setup_mode off
framerate 2
netcam_url file:////mnt/share/vlc/final.jpg
target_dir /mnt/share/vlc/motion
jpeg_filename %s
webcam_port 0
control_port 0
quiet on
on_picture_save /path/to/moution_detect.sh

#!/bin/sh
 
trap cleanup 1 2 3 6 15
 
cleanup()
{
    killall wget
    exit 1
}
 
while test true
do
    vdir=`date "+%Y-%m-%d-%H"`
    if ! [ -e $vdir ]
    then
        mkdir $vdir
    fi
 
    filename=`date "+%Y-%m-%d-%H-%M-%S"`
    wget --tries=0 -o /dev/null -O "$vdir/$filename.mpg" http://172.16.127.4:8080 &
 
    i=1
    while [ $i -lt 60 ]
    do  
        sleep 2
        sfile=`date +%s`
 
        sdir=`date "+%Y-%m-%d-%H"`
        if ! [ -e $sdir ]
        then
            mkdir $sdir
        fi
 
        let sfile = $sfile + 2
        if [ -s "$vdir/$filename.mpg" ]
        then
            ffmpeg -i "$vdir/$filename.mpg" -an -ss 00:00:$i -r 1 -vframes 1 -y -f mjpeg "$sdir/$sfile.jpg" && if [ -s "$sdir/$sfile.jpg" ]; then rm final.jpg; ln "$sdir/$sfile.jpg" final.jpg; fi &
        fi
        let i = $i + 2
 
        if [ -e stop ]
        then
            rm stop
            cleanup
        fi
    done
 
    killall wget
done