1. Армейский: Белый хлеб, масло, желток вареного яйца, соль. Употреблять утром с кофе или крепким чаем - хорошо бодрит.


2. Серый хлеб, несоленый зрелый сыр ("Король Артур"), красный болгарский перец, соль, черный молотый перец. Свежий аромат, черный перец подчеркивает вкус сыра.


3. Серый хлеб с поджаренными семенами подсолнечника, сгущенка. Сгущенка делает вкус такого хлеба очень ярким.

menuentry "Lubuntu my persistent mode" {
   loopback loop /lubuntu.iso
   linux (loop)/casper/vmlinuz boot=casper persistent iso-scan/filename=/lubuntu.iso locale=ru_RU.UTF-8 console-setup/layoutcode=ru noprompt splash --
   initrd (loop)/casper/initrd.gz
}

menuentry "AntiWinLocker" {
   ntldr /bootmgr
}

dd if=/dev/zero of=/media/Transcend/casper-rw bs=1M count=256
mkfs.ext3 /media/Transcend/casper-rw

#! /bin/bash
# create server
version="v0.7.5"
dirt=`dirname $0`
# colors
green="\033[01;32m"
black="\033[00m"
redy="\033[01;31m"

# question вопрос (переменная знач_по_умолчанию)
question() {
    echo -en "$1 [$3] " ; read var
    if [ "t$var" = "t" ] ; then
        eval $2=$3
    else
        eval $2=$var
    fi
}

# somethingh wrong (message)
error() {
    echo -e "$1"
    clean
    exit 1
}

# read parameters
read_params() {
    if [ -f $dirt/server-install.conf ] ; then
        . $dirt/server-install.conf
    else
        if [ -f /root/server-install.conf ] ; then
                . /root/server-install.conf
        else
        error "${redy}Нет конфига!!!${black}"
        fi
    fi
    if [ -f /root/server-install.conf ] ; then
        . /root/server-install.conf
    fi
}

# usage
usage() {
echo -ne "Этот скрипт $version устанавливает серверную версию линукса на жесткий диск компьютера.
${green}Первый интерфейс смотрит в интернет, второй в локалку.${black}
На обоих интерфейсах ${green}статика${black}.
Состав ПО: dnsmasq, squid, sarg, shorewall, apache2, netams, logwatch, postfix${black}
конфиг смотрится сначала ${dirt}/server-install.conf затем /root/server-install.conf\n
Опции: `basename $0` [ install | grub | fstab | network | admin ]\n\n"
}

# check limitations of disk
limita() {
if [ "d$disk" = "d" ] ; then
    echo -e "${redy}НЕТ ДИСКА!!!${black}"
    exit 1

fi
size=`fdisk -l /dev/${disk}|grep /dev/${disk}:|awk '{print $5}'`
# in Mb
size=$[$size/1000/1000]
if [ $size -lt $mindiskspace ] ; then
    echo -e "${redy}Мало места на диске!!!${black}"
    exit 1
fi
}

# count swap & home
count_sizes() {
if [ $size -lt $disksizehome ] ; then
    home=0
    swap=$[$size/10]
    if [ $swap -lt $minswap ] ; then
        # min swap
        swap=$minswap
    fi
    root=$[$size-$swap]
else
    swap=$maxswap
    root=$maxroot
    home=$[$size-$root-$swap]
fi
}

# remove partitions
rm_parts(){
for i in `parted /dev/$disk print|awk '{print $1}'|egrep '[[:digit:]]'` ; do
    swapoff /dev/${disk}$i > /dev/null 2>&1
    sleep 3
    umount -l -f /dev/${disk}$i > /dev/null 2>&1
    sleep 3
    parted -s /dev/$disk rm $i || error "${redy}Не смогла я почистить диск :(${black}"
done
}

mk_parts() {
echo -e "${green}Создаем разделы...${black}"
parted -s /dev/$disk mklabel msdos
parted -s /dev/$disk mkpart primary 0.0 ${root}.0 || error "${redy}Не смогла я создать партицию 1 на диске :(${black}"
parted -s /dev/$disk set 1 boot on
parted -s /dev/$disk mkpartfs primary linux-swap ${root}.1 $[$root+$swap].0 || error "${redy}Не смогла я создать партицию 2 на диске :(${black}"
sleep 3
mkfs.ext3 /dev/${disk}1 >/dev/null 2>&1 || error "${redy}Не смогла я отформатировать партицию 1 на диске :(${black}"
if [ $home -gt 0 ] ; then
    parted -s /dev/$disk mkpart primary $[$root+$swap].1 $[$root+$swap+$home].0 || error "${redy}Не смогла я создать партицию 3 на диске :(${black}"
    sleep 3
    mkfs.ext3 /dev/${disk}3 >/dev/null 2>&1 || error "${redy}Не смогла я отформатировать партицию 3 на диске :(${black}"
fi
parted -s /dev/$disk print
}

# unpack
unpack_sys() {
echo -e "${green}Распаковываем систему на диск...${black}"

cd /mnt$$
if [ -f $dirt/server.tar.gz ] ; then
    tar xfz $dirt/server.tar.gz || error "${redy}Не смогла я распаковать систему :(${black}"
else
    error "${redy}Нет файла $dirt/server.tar.gz!!!${black}"
fi
}

# unpack configs
unpack_configs() {
cd /mnt$$
if [ -f $dirt/server_configs.tar.gz ] ; then
    tar xfz $dirt/server_configs.tar.gz || error "${redy}Не смогла я распаковать конфиги :(${black}"
else
    error "${redy}Нет файла $dirt/server_configs.tar.gz!!!${black}"
fi
}

# mount home
mount_home() {
if egrep "${disk}3\>" /proc/partitions > /dev/null ; then
    mount /dev/${disk}3 /mnt$$/home || error "${redy}Не смогла я смонтировать home :(${black}"
    mkdir /mnt$$/home/ftp
    mkdir /mnt$$/home/netams
    chown root:nogroup /mnt$$/home/ftp
fi
}

# mount root
mount_root() {
mkdir /mnt$$
mount /dev/${disk}1 /mnt$$ || error "${redy}Не смогла я смонтировать root :(${black}"
}

mount_dev() {
sleep 1
mount --bind /dev/ /mnt$$/dev
sleep 1
chroot /mnt$$ mount -t proc none /proc
}

# fstab
mk_fstab() {
cat > /mnt$$/etc/fstab <<EOF1
# <file system> <mount point>   <type>  <options>       <dump>  <pass>
proc            /proc           proc    defaults        0       0
# /dev/sda1
`blkid -sUUID /dev/${disk}1|awk '{print $2}'|sed "s#\"##g"`     /       ext3    defaults,noatime,nodiratime,errors=remount-ro   0       0
# /dev/sda2
`blkid -sUUID /dev/${disk}2|awk '{print $2}'|sed "s#\"##g"`     none    swap    defaults        0       0
#/dev/scd0       /media/cdrom0   udf,iso9660 user,noauto,exec 0       0
# /dev/sda3
EOF1
if egrep "${disk}3\>" /proc/partitions > /dev/null ; then
    homeid=`blkid -sUUID /dev/${disk}3|awk '{print $2}'|sed "s#\"##g"`
    echo "$homeid       /home       ext3    defaults,noatime,nodiratime,errors=remount-ro   0       0" >> /mnt$$/etc/fstab
fi

}

# grub
mk_grub() {
grub-install --recheck --no-floppy --root-directory=/mnt$$ /dev/$disk >/dev/null 2>&1 || error "${redy}Не смогла я по поставить grub :(${black}"
chroot /mnt$$ update-grub -y >/dev/null 2>&1 || error "${redy}Не смогла я по поставить grub/menu.lst :(${black}"
sed -i "s|#color|color|" /mnt$$/boot/grub/menu.lst
sed -i "s|quiet splash|nosplash locale=ru_RU vga=0x303|g" /mnt$$/boot/grub/menu.lst
}

# network
mk_netw() {
question "${green}Имя сервера?${black}" hostn $def_name
echo $hostn > /mnt$$/etc/hostname
echo "127.0.0.1 localhost" > /mnt$$/etc/hosts
echo "127.0.1.1 $hostn" >> /mnt$$/etc/hosts

question "${green}Домен?${black}" domen $hostn
echo $domen > /mnt$$/etc/mailname

question "${green}Внешний интерфейс?${black}" net_iface $def_net_iface
question "${green}Внутрений интерфейс?${black}" lan_iface $def_lan_iface

question "${green}Внешний ip-адрес на $net_iface?${black}" ip_netm $def_net
ip_gw=`ipcalc $ip_netm|grep HostMin:|awk '{print $2}'`

question "${green}Шлюз?${black}" ip_gw1 $ip_gw

question "${green}Внутренний ip-адрес на $lan_iface?${black}" ip_locm $def_lan

ip_net=`ipcalc $ip_netm|grep Address:|awk '{print $2}'`
net_mask=`ipcalc $ip_netm|grep Netmask:|awk '{print $2}'`
ip_loc=`ipcalc $ip_locm|grep Address:|awk '{print $2}'`
loc_mask=`ipcalc $ip_locm|grep Netmask:|awk '{print $2}'`
loc_net=`ipcalc $ip_locm|grep Network:|awk '{print $2}'`

cat > /mnt$$/etc/network/interfaces <<EOF3
auto lo
iface lo inet loopback

auto $net_iface
iface $net_iface inet static
address $ip_net
netmask $net_mask
gateway $ip_gw1

auto $lan_iface
iface $lan_iface inet static
address $ip_loc
netmask $loc_mask
EOF3

cat > /mnt$$/etc/dnsmasq.conf <<EOFDNMAQ
interface=$lan_iface
expand-hosts
domain=$domen
dhcp-range=`ipcalc $ip_locm|grep Address:|awk '{print $2}'|cut -f1-3 -d.`.110,`ipcalc $ip_locm|grep HostMax:|awk '{print $2}'`,$loc_mask,12h

dhcp-leasefile=/var/lib/misc/dnsmasq.leases
conf-file=/etc/dnsmasq.hosts
EOFDNMAQ

echo "nameserver 127.0.0.1" > /mnt$$/etc/resolv.conf
question "${green}ip-адрес 1 DNS-servera?${black}" dns1 $def_dns1
echo "nameserver $dns1" >> /mnt$$/etc/resolv.conf
question "${green}ip-адрес 2 DNS-servera?${black}" dns2 $def_dns2
echo "nameserver $dns2" >> /mnt$$/etc/resolv.conf
}

# add admin
mk_admin() {
question "${green}Имя администратора системы?${black}" user $def_admin
chroot /mnt$$ useradd -g admin -m -k /etc/skel -s /bin/bash $user
printf "${green}Введите пароль администратора системы ${black}\n"
chroot /mnt$$ passwd $user
}

ch_configs() {
# squid
sed -i "s#REPLACEHOT#$ip_loc#" /mnt$$/etc/squid/squid.conf
sed -i "s#REPLACENET#$loc_net#" /mnt$$/etc/squid/squid.conf

# netams
sed -i "s#REPLACEHOST#$ip_loc#" /mnt$$/etc/netams/netams.cfg
sed -i "s#REPLACELAN#$loc_net#" /mnt$$/etc/netams/netams.cfg
sed -i "s#REPLACEIFACE#$lan_iface#" /mnt$$/etc/netams/netams.cfg
sed -i "s#REPLACELNET#`echo $loc_net|cut -f1 -d/`#" /mnt$$/etc/netams/netams.cfg
sed -i "s#REPLACEMASK#$loc_mask#" /mnt$$/etc/netams/netams.cfg

#shorewall
sed -i "s#REPLACEHOST#$ip_loc#" /mnt$$/etc/shorewall/rules
sed -i "s#REPLACEIFACEINET#$net_iface#" /mnt$$/etc/shorewall/*
sed -i "s#REPLACEIFACELAN#$lan_iface#" /mnt$$/etc/shorewall/*

#screen
sed -i "s#SERVER#$hostn#" /mnt$$/etc/skel/.screenrc

#postfix
sed -i "s#DOMAIN#$domen#" /mnt$$/etc/postfix/main.cf
sed -i "s#LAN#$loc_net#" /mnt$$/etc/postfix/main.cf
}

#umount & clear
clean() {
umount -l -f /mnt$$/dev 2>/dev/null
sleep 3
chroot /mnt$$ umount -l -f /proc 2>/dev/null
sleep 3
umount -l -f /mnt$$
sleep 3
rm -r /mnt$$
}

################################################################################
# begin

################################################################################
if [ $UID -ne 0 ] ; then
    echo 'run this script whith SUDO' ; exit 1
fi

case $1 in
    install)
        read_params
        sfdisk -s
        question "${green}На какой диск будем устанавливать?${black}" dsk $def_disk
        disk=`cat /proc/partitions|egrep "${dsk}\>"|awk '{print $4}'`
        limita
        question "${redy}Диск $disk будет отформатирован!!! Продолжить? (NO/yes)${black} " answ NO
        if [ $answ != "yes" ] ; then
            echo "Выход"
            exit 0
        fi
        count_sizes
        rm_parts
        mk_parts
        mount_root
        unpack_sys
        mount_home
        mount_dev
        mk_fstab
        mk_grub
        mk_netw
        mk_admin
        ch_configs
        clean
        ;;
    grub)
        echo -e "${green}Обновляем grub...${black}"
        read_params
        question "${green}Какой диск?${black}" disk $def_disk
        mount_root
        mount_dev
        mk_grub
        clean
        ;;
    fstab)
        echo -e "${green}Обновляем /etc/fstab...${black}"
        read_params
        question "${green}Какой диск?${black}" disk $def_disk
        mount_root
        mk_fstab
        clean
        ;;
    network)
        echo -e "${green}Обновляем сетевые настройки...${black}"
        read_params
        question "${green}Какой диск?${black}" disk $def_disk
        mount_root
        mk_netw
        unpack_configs
        ch_configs
        clean

        ;;
    admin)
        echo -e "${green}Добавляем админа...${black}"
        read_params
        question "${green}Какой диск?${black}" disk $def_disk
        mount_root
        mount_home
        mk_admin
        clean
        ;;
    *)
        usage
        ;;
esac

#! /usr/bin/tclsh
# откуда по умолчанию берем музыку
set from /mnt/dva/music
# где у нас база музыки
set dbase ~/muzic.db
# вынужденная глобальная переменная для рекурсивного glob
set ::dirs ""
############# рекурсивный glob для создания списка директорий   ###############
proc globdir {{name .}} {
    lappend ::dirs $name
    foreach subdir [glob -nocomplain -directory $name -type d *] {
       globdir $subdir
    }
}
# если есть аргументы, берем музыку оттуда
if {$argc > 0} {set from $argv}
package require sqlite3
sqlite3 db $dbase
# если таблица не существует, создаем id-номер, name-имя файла, use-копировался уже на флэшку или нет
if ![db exists "select name from sqlite_master where type='table' and tbl_name='muz';"] {
    db eval "CREATE TABLE muz (id integer primary key, name text, use integer);"
}
# мой костыль для подмонтирования NAS с музыкой
exec sudo mount -t cifs //192.168.0.2/public /mnt -o users,iocharset=utf8,username=guest,password=

puts "Стираем ссылки на несуществующие файлы......"
db eval "select * from muz;" {
    if ![file exists $name] {
        puts $name
        db eval "delete from muz where id='$id';"
    }
}

puts "Заносим в базу новые файлы......."
globdir $from
foreach d $::dirs {
    foreach f [glob -nocomplain -directory $d -type f *.{mp,MP,Mp}3] {
        regsub -all {'} $f {''} f
#'
        if ![db exists "select id from muz where name='$f';"] {
            puts $f
            db eval "insert into muz values (NULL, '$f' ,0);"
        }
    }
}

# отмонтируем NAS
exec sudo umount /mnt

#! /usr/bin/tclsh
# база с музыкой
set dbase ~/muzic.db
# куда копируем по умолчанию 
set path /media/Transcend
# меняем путь при наличии аргументов
if {$argc > 0} {set path $argv}
puts $path

# мой костыль для NAS
exec sudo mount -t cifs //192.168.0.2/public /mnt -o users,iocharset=utf8,username=guest,password=
package require sqlite3
sqlite3 db $dbase
# начальный номер композиции, они берутся в случайном порядке для тупых китайских плейеров не умеющих shuffle
set num 1000
# для того чтоб выходило когда кончится место на флэшке
catch {
  while {1} {
    db eval "select id,name from muz where use='0' order by random() limit 1;" {
        file copy $name ${path}/${num}.mp3  
        puts "$num      $name"
# помечаем что копировали для того чтоб избегнуть повторов
        db eval "update muz set use='1' where id='$id';"
        incr num
    }
  }
}
# отмонтируем NAS
exec sudo umount /mnt

smartctl -a /dev/sda

SCT capabilities:  (0x303f) SCT Status supported.
			SCT Error Recovery Control supported.  *****
			SCT Feature Control supported.

# smartctl -l scterc /dev/sda

SCT Error Recovery Control:
           Read:     70 (7.0 seconds)
          Write:     70 (7.0 seconds)

smartctl -l scterc,120,60 /dev/sde

#! /usr/bin/tclsh
source config/cfg.cfg
test_cookie
doctype
html {
 siteheader "Iconez" lite
 body {
  cms-menu
  sidebar
  if ![guest] {
    div -class main -style text-align:center {
      h3 {puts "Прикрепленные ярлычки:"}
      hr
      table {
        foreach lin [exec ls images/ | grep "16x16.png$"] {
          tr {td {img -src /images/$lin -width 32px -height 32px}
            td {puts /images/$lin}
          }
        }
      }
    }
  }
  sitefooter lite
  }
}

package provide html2 1.0
namespace eval ::html2:: {
    namespace export *
}

# шаблон для генерации стандартного html-тэга
proc ::html2::tag {name args} {
  set name [string range $name [expr [string last : $name]+1] end]
  if [expr [llength $args]%2] {
    set opts [lrange $args 0 end-1]
    set b [lindex $args end]
  } else {
    set opts $args
    set b ""
  }
  puts -nonewline "<$name"
  foreach {argname argvalue} $opts {
    if [regexp " $argname " " -checked -hidden -readonly "] {
      if {$argvalue ne "0"} {puts -nonewline " [string range $argname 1 end]"}
    } else {puts -nonewline " [string range $argname 1 end]=\"$argvalue\""}
  }
  ### для незакрывающихся тегов
  if ![regexp " $name " " area base basefont col frame param meta link img input hr br "] {
    puts -nonewline ">"
    uplevel 1 $b
    puts -nonewline "</$name>"
  } else {
    if {$name eq "img" && ![regexp -- "-alt" $opts]} {

      puts -nonewline " alt=\"\""
    }
    puts -nonewline ">"
  }
}

foreach name {html meta title body head style link script form textarea input table thead tfoot tbody tr td th
  center a font button div span p img label ol ul li b i u s strong em h1 h2 h3 h4 h5 h6
  br hr var code kbd tt samp pre acronym embed header footer dd dt video audio} {
  proc ::html2::$name args {
    set name [lindex [info level 0] 0]
    uplevel 1 html2::tag $name $args
  }
}

proc ::html2::doctype {} {
  puts {Content-Type: text/html; charset=utf-8

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">}
}

proc ::html2::html5 {} {
  puts {Content-Type: text/html; charset=utf-8

<!DOCTYPE html>}
}

#! /bin/bash
# у меня network-manager - разрываем связь если есть 
nmcli dev disconnect iface wlan0
ip l set wlan0 up
ip a a 10.3.4.1/24 dev wlan0 brd +
hostapd -B ~/bin/hostapd.conf
dnsmasq -i wlan0 -F 10.3.4.2,10.3.4.20,1h
echo 1 > /proc/sys/net/ipv4/ip_forward
iptables -t nat -A POSTROUTING -o ppp0 -j MASQUERADE

wpa=2
rsn_pairwise=CCMP
wpa_passphrase=PASSWPANET
driver=nl80211
interface=wlan0
hw_mode=g
channel=1
ssid=ESSID

#! /bin/bash
iptables -t nat -D POSTROUTING -o ppp0 -j MASQUERADE
ip  a d 10.3.4.1/24 dev wlan0
killall dnsmasq
killall hostapd
ip l set wlan0 down

perl -e '@a=split(//,unpack("b*","*102#")); for ($i=7; $i < $#a; $i+=8) { $a[$i]="" } print uc(unpack("H*", pack("b*", join("", @a))))."\n"'
AA184C3602

AT+CUSD=1,AA184C3602,15
OK

+CUSD: 0,"04110430043B0430043D04410020003500370039002E003600300440002E00200422044004300
4440438043A002000300020041A0431002E0414043504420430043B0438003A002000680074007400700073
003A002F002F00750073006C007500670069002E006200650065006C0069006E0065002E00720075",72

echo "04110430043B0430043D04410020003500370039002E003600300440002E0
02004220440043004440438043A002000300020041A0431002E0414043504420430043B0438003A0020
00680074007400700073003A002F002F00750073006C007500670069002E006200650065006C0069006
E0065002E00720075" \
| perl -ne '@a = m/([0-9A-F]{4})/g; map { eval "print \"\\x{$_}\""; } @a;' 2>/dev/null

Баланс 579.60р. Трафик 0 Кб.Детали: https://uslugi.beeline.ru

#!/usr/bin/env python
# -*- coding: utf-8 -*-
#
# This script send 'get balance' request to the Beeline 
# from Huawei E219/E220 USB-GPRS modem.
#
# IDima (c) 2008
#
import serial
import string
import os
#
# Decode string from Beeline to current charset
#
def str2byte(a):
    b=''
    for i in range(len(a)/4):
        b+=chr(eval('0x'+a[i*4+2:i*4+4]))+chr(eval('0x'+a[i*4:i*4+2]))
    return unicode(b, 'utf16')
#
# Definitions
#
USBPORT='/dev/ttyUSB2'
USBSPEED=460800
MAXSTRINGLENGTH=300

#print "Wait a USSD request ... "
s=serial.Serial(USBPORT,USBSPEED,timeout=5)
s.write('ATZ \015')
s.write('AT+CUSD=1,AA184C3602,15 \015')
line=''
while line[0:6] != '+CUSD:':            
    line=s.readline(MAXSTRINGLENGTH)
s.close()

line2=line.split(',')[1]
line3=string.replace(line2,'"','')
line4=str2byte(line3)
result=line4.encode('utf8')
#result=line3
# вывод в консоль
print result
# вывод в нотификатор
os.system('echo "message:' + result + '" | /usr/bin/zenity --notification --listen --timeout 5')
#os.system('notify-send -i info -t 5000 "Запрос баланса" "' + result +'"')

#! /usr/bin/tclsh
# порт
set port /dev/ttyUSB2
# запрос баланса
set req AT+CUSD=1,AA184C3602,15

# вывод в нотификатор
#proc mess m {
#    puts $m
#}

proc mess m {
    exec notify-send -i info -t 5000 "Запрос баланса" $m
}


if {![file exists $port]} {
    mess "Модем не подключен?"
    exit 1
}
if [catch {set f [open $port w+]}] {
    mess "Нет прав на открытие $port"
    exit 1
}
fconfigure $f -mode 19200,n,8,1 -blocking 0 -buffering none
# сброс модема
puts $f ATZ
after 100
puts $f $req
set a ""
set timeout 300
# читаем из порта до ответа
while {![regexp {\+CUSD\:} $a]} {
    after 100
    set a [read $f]
    incr timeout -1
    if {!$timeout} {
        mess "Нет ответа от модема"
        exit 1
    }
}
close $f
# вырезаем ответ
regexp {"([[:xdigit:]]*)"} $a => a
set c 0 ; set str ""
# декодируем ответ
while {$c < [string length $a]} {
    set str $str[format "%c" "0x[string range $a $c [expr $c+3]]"]
    incr c 4
}
mess $str

# порт
set port /dev/ttyUSB1
# запрос баланса
set req AT+CUSD=1,#102#,15

Name: passwd/user-default-groups                                                                                             
Default: adm cdrom dialout audio lpadmin netdev plugdev sambashare                                                           
Description: for internal use only                                                                                           
Type: string                                                                                                                 
Owners: passwd/user-default-groups