From cb99d998e1fbed8655ea90e3f9aa8cae697ca955 Mon Sep 17 00:00:00 2001 From: Maxim Lihachev Date: Wed, 28 Aug 2013 20:25:37 +0600 Subject: [PATCH] Initial commit --- bor | 10 ++ dates | 45 +++++++++ defgroups | 49 +++++++++ doctools2man | 15 +++ ext | 30 ++++++ fb2 | 326 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ getignore | 25 +++++ ibor | 10 ++ mem | 23 +++++ office2pdf | 17 ++++ pk | 13 +++ rip | 7 ++ rip_pcm | 7 ++ setrating | 25 +++++ suDo | 18 ++++ utable | 157 ++++++++++++++++++++++++++++ 16 files changed, 777 insertions(+) create mode 100755 bor create mode 100755 dates create mode 100755 defgroups create mode 100755 doctools2man create mode 100755 ext create mode 100755 fb2 create mode 100755 getignore create mode 100755 ibor create mode 100755 mem create mode 100755 office2pdf create mode 100755 pk create mode 100755 rip create mode 100755 rip_pcm create mode 100755 setrating create mode 100755 suDo create mode 100755 utable diff --git a/bor b/bor new file mode 100755 index 0000000..8680d27 --- /dev/null +++ b/bor @@ -0,0 +1,10 @@ +#!/bin/bash + +#- Чтение цитат с bash.org.ru +curl -s http://bash.im/rss/ | \ +iconv -c -f cp1251 -t utf8 | \ +sed 's/<\/description>//g; s/
/\n/g; s/\</>> /g; + s/\>/:/g; s/\"/"/g; s/\s*<.*$\|\s*xmlns:.*$//g;' | \ +grep . | less + diff --git a/dates b/dates new file mode 100755 index 0000000..b3d2a5c --- /dev/null +++ b/dates @@ -0,0 +1,45 @@ +#!/bin/bash + +#Создан: Чт 06 Май 2010 02:44:00 +#Изменён: Ср 28 авг 2013 19:58:49 + +# Скрипт напоминания о датах +# +# Формат файла DATAFILE: +# +# = Январь = +# +# * *01/01* - Событие 1 +# +# = Февраль = +# +# * *02/02* - Событие 2 +# * *03/02* - Событие 3 + +#Файл с данными +DATAFILE="$SHELLRC/vimwiki/wiki/ЖЖ/Даты и события/dates.wiki" +#За сколько дней оповещать +DAYS=3 +#Сегодняшнее число +TODAY=$(\date +%s --date=$(\date '+%m/%d')) +#Количество найденных событий +FOUND=0 + +dates() { + echo "$greenБлижайшие даты:$rstc" + + #Поиск дат в базе данных + for i in $(seq 0 $DAYS); do + DATE=$(\date -d "UTC 1970-01-01 $(($TODAY + 86400*$i)) secs" '+%d/%m') + grep -v '#.*' "$DATAFILE" | grep $DATE && ((FOUND++)) + done; + + #Код возврата. 1 - не найдено дат. + [ $FOUND -eq 0 ] && echo "-" && exit 1 || exit 0 +} + +case "$1" in + -all) cat "$DATAFILE";; + *) dates;; +esac + diff --git a/defgroups b/defgroups new file mode 100755 index 0000000..c1368ab --- /dev/null +++ b/defgroups @@ -0,0 +1,49 @@ +#!/usr/bin/env guile +!# + +;;;Создан: Сб 10 июл 2010 19:29:10 +;;;Изменён: Вс 21 июл 2010 01:40:25 + +;;; +;;; Скрипт составления команды UNIX Shell для добавления пользователя в группы. +;;; Группы добавляются к уже имеющимся. +;;; +;;; (c) 2010, Maxim Lihachev, +;;; + +;;Стандартные группы для пользователей +(define default-groups (list "plugdev" "audio" "video" "cdrom" "scanner" "users")) + +;;Получение первого элемента вектора +(define (vector-car vector) (vector-ref vector 0)) + +;;Получение списка существующих групп +(define (get-all-groups) + (do ( (group (getgr) (getgr)) + (groups '() (append groups (list group)))) + ((not (vector? group)) groups))) + +;;Получение списка групп, в которые входит данный пользователь +(define (get-old-groups user groups) + (map vector-car (filter (lambda (g) (member user (group:mem g))) groups))) + +;;Получение списка групп, в которые должен входить пользователь +(define (get-new-groups groups) + (filter (lambda (x) (not (member x groups))) default-groups)) + +;;Создание команды оболочки для добавления пользователя в группы +(define (make-command user groups) + (format #f "usermod -G ~A ~A\n" (string-join groups ",") user)) + +;;;----------------------------------------------------------------------------- +;;Формирование команд оболочки +(let* ( (all-groups (get-all-groups)) + (users (if (< 1 (length (command-line))) + (cdr (command-line)) + (list (cuserid)))) + (get-command (lambda (user) + (let* ( (oldg (get-old-groups user all-groups)) + (newg (get-new-groups oldg))) + (display (make-command user (append oldg newg))))))) + (for-each get-command users)) + diff --git a/doctools2man b/doctools2man new file mode 100755 index 0000000..c0ecc18 --- /dev/null +++ b/doctools2man @@ -0,0 +1,15 @@ +#!/usr/bin/env tclsh + +#Создан: Сбт 09 Июл 2011 00:22:26 +#Изменён: Сбт 09 Июл 2011 01:32:08 + +package require doctools +package require fileutil + +# USAGE +lassign $argv format file out + +::doctools::new mydtp -format $format + +fileutil::writeFile -encoding koi8-r $out [mydtp format [fileutil::cat $file]] + diff --git a/ext b/ext new file mode 100755 index 0000000..2c7c32c --- /dev/null +++ b/ext @@ -0,0 +1,30 @@ +#!/bin/bash + +#- Распаковка архивов +ext() { + [ -f "$1" ]; { + case "$1" in + *.tar.bz2) tar xjf "$1";; + *.tar.gz) tar xzf "$1";; + *.tar.Z) tar xzf "$1";; + *.txz) tar xJf "$1";; + *.xz) tar xJf "$1";; + *.bz2) bunzip2 "$1";; + *.rar) unrar x "$1";; + *.gz) gunzip "$1";; + *.jar) unzip "$1";; + *.tar) tar xf "$1";; + *.tbz2) tar xjf "$1";; + *.tgz) tar xzf "$1";; + *.zip) unzip "$1";; + *.Z) uncompress "$1";; + *.7z) 7z x "$1";; + *.7za) 7z x "$1";; + *) echo -e \ + ""$green"<${1:-"-"}>: Неизвестный формат архива";; + esac + } +} + +ext "$*" + diff --git a/fb2 b/fb2 new file mode 100755 index 0000000..97a6566 --- /dev/null +++ b/fb2 @@ -0,0 +1,326 @@ +#!/bin/bash +# + +case ${1:0-3} in + zip) TEXT=$(zcat "$1");; + fb2) TEXT=$(cat "$1");; + *) echo "Неизвестный формат файла"; exit 1;; +esac + +# zip) zcat "$1" | xsltproc "$(dirname $(which $0))/FB2_2_xhtml.xsl" -;; +# fb2) cat "$1" | xsltproc "$(dirname $(which $0))/FB2_2_xhtml.xsl" -;; + +FB2=`cat < + + + + + + + + + + <xsl:value-of select="fb:description/fb:title-info/fb:book-title"/> + + + + + +
+ +
+
+ + +
    + +
+
+ + + +
+ + +

+ +

+ + + + + + + + + + + + + + +
+ + + +
  • + + + , # + + + +
      + + + +
    +     + + + + + + + + + +
  • + + +
    +     +
    • + + +     + + + + + + +
    +     + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

    +     + + +
    +     + + + + + + + +
    + +
    +     + + +
    + + + +    
    +     + + + + + + + + + + + + + + +
    +     + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

    Annotation

    + +     + + +
    + + + + + + +
    +     + + +
    + +
    +     + + +
    + + + + + + +
    +     + + +
    +
    +     + + + + +     +
    +     + +     +
    +     +     +     + + +
    + + + + + + +
    +     + + + + +
    +     + + + + + + + +
    +     + + +
    + + + + + + + + + + +
    +     + + +FB2RULES` + +echo $TEXT | xsltproc <(echo $FB2) - | lynx -stdin -display_charset=UTF-8 + diff --git a/getignore b/getignore new file mode 100755 index 0000000..c82320c --- /dev/null +++ b/getignore @@ -0,0 +1,25 @@ +#!/bin/bash + +#Создан: Вс 25 авг 2013 19:40:12 +#Изменён: Ср 28 авг 2013 20:24:59 + +# Добавление файлов с меткой +GITIGNORE в исключения .git + +# Метка должна располагаться не далее пятой колонки +\grep -E '^.{1,5}\+GITIGNORE' -R > /tmp/gitignore.tmp + +if [ -f ".gitignore" ]; then + while read line; do + echo lll $line + sed -i "/${line//\//.}/d" /tmp/gitignore.tmp 2> /dev/null + done < .gitignore +fi + +echo "\n# [ $(\date +%d.%m.%Y) ]\n" >> .gitignore + +cut -d ':' -f 1 /tmp/gitignore.tmp | sort -u >> .gitignore + +echo >> .gitignore + +\rm /tmp/gitignore.tmp + diff --git a/ibor b/ibor new file mode 100755 index 0000000..2b86fbd --- /dev/null +++ b/ibor @@ -0,0 +1,10 @@ +#!/bin/bash + +#- Чтение цитат с ibash.org.ru +curl -s http://ibash.org.ru/rss.xml | \ +iconv -c -f cp1251 -t utf8 | \ +sed 's/<\/description>//g; s/
    /\n/g; s/\</>> /g; + s/\>/:/g; s/\"/"/g; s/\s*<.*$\|\s*xmlns:.*$//g;' | \ +grep . | less + diff --git a/mem b/mem new file mode 100755 index 0000000..8ffa42b --- /dev/null +++ b/mem @@ -0,0 +1,23 @@ +#!/bin/bash + +#- Заметки +memfile=$SHELLRC/var/memory/mem +case "$1" in + -h) printf "\tКлючи:\n\ + -e\t-Редактирование записей\n\ + -l n\t-Последние n записей\n\ + -s\t-Поиск по записям\n\ + -remove\t-Удалить запись по номеру\n\ + -clear\t-Удалить все записи\n\ + -h\t-Справка\n";; + + -e) vim $memfile;; + -l) tail -"$2" $memfile | nl | \grep --color -E '.{1,}==>';; + -s) grep "$2" $memfile | nl | \grep --color -E '.{1,}==>';; + -remove) sed "$2d" -i $memfile;; + -clear) > $memfile;; + '') cat $memfile | nl | \grep --color -E '.{1,}==>';; + *) printf "[ `\date '+%d.%m.%Y %H:%M:%S'` ] ==> $1\n" >> $memfile && printf \ + "$greenЗаметка$yellow $1 $greenуспешно добавлена\n$rstc" +esac + diff --git a/office2pdf b/office2pdf new file mode 100755 index 0000000..8bfeba6 --- /dev/null +++ b/office2pdf @@ -0,0 +1,17 @@ +#!/bin/bash + +#pgrep soffice.bin || \ +soffice \ + -headless \ + -accept="socket,host=127.0.0.1,port=8100;urp;" \ + -nofirststartwizard + +sleep 1 + +for i; { + java -jar $SHELLRC/etc/soft/jodconverter/lib/jodconverter-cli-2.2.2.jar \ + "$i" "${i//\.*/}.pdf" +} + +killall soffice.bin + diff --git a/pk b/pk new file mode 100755 index 0000000..10d3bdc --- /dev/null +++ b/pk @@ -0,0 +1,13 @@ +#!/bin/bash + +#- Запаковка архивов +case ${2:-tbz} in + tbz) tar cjvf $1.tar.bz2 $1;; + tgz) tar czvf $1.tar.gz $1;; + tar) tar cpvf $1.tar $1;; + bz2) bzip $1;; + gz) gzip -c -9 -n $1 > $1.gz;; + zip) zip -r $1.zip $1;; + 7z) 7za a $1.7z $1;; +esac + diff --git a/rip b/rip new file mode 100755 index 0000000..ec6ccad --- /dev/null +++ b/rip @@ -0,0 +1,7 @@ +#!/bin/bash + +#- Рип DVD и видео +mencoder $1 -ovc x264 -vf yadif -oac copy \ +-x264encopts subq=6:partitions=all:8x8dct:me=umh:\ +frameref=5:bframes=4:b_pyramid:weight_b:threads=2:crf=22 -o $2 + diff --git a/rip_pcm b/rip_pcm new file mode 100755 index 0000000..9f959d2 --- /dev/null +++ b/rip_pcm @@ -0,0 +1,7 @@ +#!/bin/bash + +#- Рип DVD и видео с pcm-дорожкой +mencoder $1 -ovc x264 -vf yadif -oac pcm \ +-x264encopts subq=6:partitions=all:8x8dct:me=umh:\ +frameref=5:bframes=4:b_pyramid:weight_b:threads=2:crf=22 -o $2 + diff --git a/setrating b/setrating new file mode 100755 index 0000000..7439344 --- /dev/null +++ b/setrating @@ -0,0 +1,25 @@ +#!/bin/bash + +# +# Изменение комментария в id3-теге с помощью ncmpcpp +# $1 -- текст комментария +# + +# Переход к редактору тегов +xdotool key e +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Down +xdotool key Return +xdotool key Control+u +xdotool type $1 +xdotool key Return +xdotool key y + diff --git a/suDo b/suDo new file mode 100755 index 0000000..c54c884 --- /dev/null +++ b/suDo @@ -0,0 +1,18 @@ +#!/usr/bin/env tclsh + +# Выполнение команды с правами администратора +# Используется с dmenu +# suDo + +package require Expect + +proc execCommand {command password} { + spawn bash + exp_send "su -c \"$command\"\n" + expect -nocase "password: " + exp_send "$password\n" + expect eof +} + +execCommand [lindex $argv 0] [lindex $argv 1] + diff --git a/utable b/utable new file mode 100755 index 0000000..0adcd3a --- /dev/null +++ b/utable @@ -0,0 +1,157 @@ +#!/usr/bin/env tclsh + +#Создан: Вт 06 июл 2010 19:18:44 +#Изменён: Чт 22 июл 2010 19:27:09 + +#---------------------------------------------------------------------------+ +# | +# Скрипт отображает символы Unicode. | +# | +# Использование: utable [класс символов] | +# | +# Copyrignt (c) 2010-2013, Likhachev Maxim, <> | +# | +#---------------------------------------------------------------------------+ + +#Классы символов Unicode +array set category { + Basic_Latin {"Basic_Latin" 0x0000 0x007F} + Latin-1_Supplement {"Latin-1_Supplement" 0x0080 0x00FF} + Latin_Extended-A {"Latin_Extended-A" 0x0100 0x017F} + Latin_Extended-B {"Latin_Extended-B" 0x0180 0x024F} + IPA_Extensions {"IPA_Extensions" 0x0250 0x02AF} + Spacing_Modifier_Letters {"Spacing_Modifier_Letters" 0x02B0 0x02FF} + Combining_Diacritical_Marks {"Combining_Diacritical_Marks" 0x0300 0x036F} + Greek_and_Coptic {"Greek_and_Coptic" 0x0370 0x03FF} + Cyrillic {"Cyrillic" 0x0400 0x04FF} + Cyrillic_Supplementary {"Cyrillic_Supplementary" 0x0500 0x052F} + Armenian {"Armenian" 0x0530 0x058F} + Hebrew {"Hebrew" 0x0590 0x05FF} + Arabic {"Arabic" 0x0600 0x06FF} + Syriac {"Syriac" 0x0700 0x074F} + Thaana {"Thaana" 0x0780 0x07BF} + Devanagari {"Devanagari" 0x0900 0x097F} + Bengali {"Bengali" 0x0980 0x09FF} + Gurmukhi {"Gurmukhi" 0x0A00 0x0A7F} + Gujarati {"Gujarati" 0x0A80 0x0AFF} + Oriya {"Oriya" 0x0B00 0x0B7F} + Tamil {"Tamil" 0x0B80 0x0BFF} + Telugu {"Telugu" 0x0C00 0x0C7F} + Kannada {"Kannada" 0x0C80 0x0CFF} + Malayalam {"Malayalam" 0x0D00 0x0D7F} + Sinhala {"Sinhala" 0x0D80 0x0DFF} + Thai {"Thai" 0x0E00 0x0E7F} + Lao {"Lao" 0x0E80 0x0EFF} + Tibetan {"Tibetan" 0x0F00 0x0FFF} + Myanmar {"Myanmar" 0x1000 0x109F} + Georgian {"Georgian" 0x10A0 0x10FF} + Hangul_Jamo {"Hangul_Jamo" 0x1100 0x11FF} + Ethiopic {"Ethiopic" 0x1200 0x137F} + Cherokee {"Cherokee" 0x13A0 0x13FF} + Unified_Canadian_Aboriginal_Syllabics {"Unified_Canadian_Aboriginal_Syllabics" 0x1400 0x167F} + Ogham {"Ogham" 0x1680 0x169F} + Runic {"Runic" 0x16A0 0x16FF} + Tagalog {"Tagalog" 0x1700 0x171F} + Hanunoo {"Hanunoo" 0x1720 0x173F} + Buhid {"Buhid" 0x1740 0x175F} + Tagbanwa {"Tagbanwa" 0x1760 0x177F} + Khmer {"Khmer" 0x1780 0x17FF} + Mongolian {"Mongolian" 0x1800 0x18AF} + Limbu {"Limbu" 0x1900 0x194F} + Tai_Le {"Tai_Le" 0x1950 0x197F} + Khmer_Symbols {"Khmer_Symbols" 0x19E0 0x19FF} + Phonetic_Extensions {"Phonetic_Extensions" 0x1D00 0x1D7F} + Latin_Extended_Additional {"Latin_Extended_Additional" 0x1E00 0x1EFF} + Greek_Extended {"Greek_Extended" 0x1F00 0x1FFF} + General_Punctuation {"General_Punctuation" 0x2000 0x206F} + Superscripts_and_Subscripts {"Superscripts_and_Subscripts" 0x2070 0x209F} + Currency_Symbols {"Currency_Symbols" 0x20A0 0x20CF} + Combining_Diacritical_Marks_for_Symbols {"Combining_Diacritical_Marks_for_Symbols" 0x20D0 0x20FF} + Letterlike_Symbols {"Letterlike_Symbols" 0x2100 0x214F} + Number_Forms {"Number_Forms" 0x2150 0x218F} + Arrows {"Arrows" 0x2190 0x21FF} + Mathematical_Operators {"Mathematical_Operators" 0x2200 0x22FF} + Miscellaneous_Technical {"Miscellaneous_Technical" 0x2300 0x23FF} + Control_Pictures {"Control_Pictures" 0x2400 0x243F} + Optical_Character_Recognition {"Optical_Character_Recognition" 0x2440 0x245F} + Enclosed_Alphanumerics {"Enclosed_Alphanumerics" 0x2460 0x24FF} + Box_Drawing {"Box_Drawing" 0x2500 0x257F} + Block_Elements {"Block_Elements" 0x2580 0x259F} + Geometric_Shapes {"Geometric_Shapes" 0x25A0 0x25FF} + Miscellaneous_Symbols {"Miscellaneous_Symbols" 0x2600 0x26FF} + Dingbats {"Dingbats" 0x2700 0x27BF} + Miscellaneous_Mathematical_Symbols-A {"Miscellaneous_Mathematical_Symbols-A" 0x27C0 0x27EF} + Supplemental_Arrows-A {"Supplemental_Arrows-A" 0x27F0 0x27FF} + Braille_Patterns {"Braille_Patterns" 0x2800 0x28FF} + Supplemental_Arrows-B {"Supplemental_Arrows-B" 0x2900 0x297F} + Miscellaneous_Mathematical_Symbols-B {"Miscellaneous_Mathematical_Symbols-B" 0x2980 0x29FF} + Supplemental_Mathematical_Operators {"Supplemental_Mathematical_Operators" 0x2A00 0x2AFF} + Miscellaneous_Symbols_and_Arrows {"Miscellaneous_Symbols_and_Arrows" 0x2B00 0x2BFF} + CJK_Radicals_Supplement {"CJK_Radicals_Supplement" 0x2E80 0x2EFF} + Kangxi_Radicals {"Kangxi_Radicals" 0x2F00 0x2FDF} + Ideographic_Description_Characters {"Ideographic_Description_Characters" 0x2FF0 0x2FFF} + CJK_Symbols_and_Punctuation {"CJK_Symbols_and_Punctuation" 0x3000 0x303F} + Hiragana {"Hiragana" 0x3040 0x309F} + Katakana {"Katakana" 0x30A0 0x30FF} + Bopomofo {"Bopomofo" 0x3100 0x312F} + Hangul_Compatibility_Jamo {"Hangul_Compatibility_Jamo" 0x3130 0x318F} + Kanbun {"Kanbun" 0x3190 0x319F} + Bopomofo_Extended {"Bopomofo_Extended" 0x31A0 0x31BF} + Katakana_Phonetic_Extensions {"Katakana_Phonetic_Extensions" 0x31F0 0x31FF} + Enclosed_CJK_Letters_and_Months {"Enclosed_CJK_Letters_and_Months" 0x3200 0x32FF} + CJK_Compatibility {"CJK_Compatibility" 0x3300 0x33FF} + CJK_Unified_Ideographs_Extension_A {"CJK_Unified_Ideographs_Extension_A" 0x3400 0x4DBF} + Yijing_Hexagram_Symbols {"Yijing_Hexagram_Symbols" 0x4DC0 0x4DFF} + CJK_Unified_Ideographs {"CJK_Unified_Ideographs" 0x4E00 0x9FFF} + Yi_Syllables {"Yi_Syllables" 0xA000 0xA48F} + Yi_Radicals {"Yi_Radicals" 0xA490 0xA4CF} + Hangul_Syllables {"Hangul_Syllables" 0xAC00 0xD7AF} + High_Surrogates {"High_Surrogates" 0xD800 0xDB7F} + High_Private_Use_Surrogates {"High_Private_Use_Surrogates" 0xDB80 0xDBFF} + Low_Surrogates {"Low_Surrogates" 0xDC00 0xDFFF} + Private_Use_Area {"Private_Use_Area" 0xE000 0xF8FF} + CJK_Compatibility_Ideographs {"CJK_Compatibility_Ideographs" 0xF900 0xFAFF} + Alphabetic_Presentation_Forms {"Alphabetic_Presentation_Forms" 0xFB00 0xFB4F} + Arabic_Presentation_Forms-A {"Arabic_Presentation_Forms-A" 0xFB50 0xFDFF} + Variation_Selectors {"Variation_Selectors" 0xFE00 0xFE0F} + Combining_Half_Marks {"Combining_Half_Marks" 0xFE20 0xFE2F} + CJK_Compatibility_Forms {"CJK_Compatibility_Forms" 0xFE30 0xFE4F} + Small_Form_Variants {"Small_Form_Variants" 0xFE50 0xFE6F} + Arabic_Presentation_Forms-B {"Arabic_Presentation_Forms-B" 0xFE70 0xFEFF} + Halfwidth_and_Fullwidth_Forms {"Halfwidth_and_Fullwidth_Forms" 0xFF00 0xFFEF} + Specials {"Specials" 0xFFF0 0xFFFF} +} + +#Перевод из шестнадцатеричной системы в десятичную +proc hex2dec {code} { return [format "%d" $code]} + +#Выбор наборов символов по маске +proc getCharsets {rgx} { + if {$rgx eq "-b"} { set rgx {math|arrow|misc} } + + set charsetList {} + foreach charset [lsort [array names ::category]] { + if {[regexp "(?i).*($rgx).*" $charset]} { + lappend charsetList $charset + } + } + return $charsetList +} + +#Вывод таблицы символов +proc showUTFCodes {charset} { + foreach {category start end} $::category($charset) {} + + for {set i [hex2dec $start]} {$i <= [hex2dec $end]} {incr i} { + set char [format "%c" $i] + if {[regexp {[^[:space:]]} $char match]} { + puts [format "%-40s%#5x: %s" $category $i $char] + } + } +} + +#-------------------------------------------- +foreach charset [getCharsets [lindex $argv 0]] { + catch {showUTFCodes $charset} +} +