- 1
1
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−103
1
−371
ip=$(/bin/env | grep REMOTE_ADDR | cut -f 2 -d"=")
−125
{
(cd "$DIR"; ls -1);
{ xml2 < $XML | grep '/list/files/@path=' | cut -d = -f 2 | cut -d / -f 2 | sort | uniq; }
} | sort | uniq --count | grep '^ *1' | awk '{print $2}' | (cd "$DIR"; xargs --no-run-if-empty rm -v)
Удаляет из "$DIR" всё, что не описано в files.xml.
−105
Любите 1С
−133
#!/bin/bash
ps -eo pid,ppid,comm > data
#treeNet[0]=1
depth=0
init=0
tree()
{
#echo $1
let depth=depth+1
treeNet[$depth]=1
for ((i=1;i<depth-1;i++))
do
# echo ${treeNet[$depth]}
if [[ ${treeNet[$i]} -eq 0 ]]
then
echo -n " "
fi
if [[ ${treeNet[$i]} -eq 1 ]]
then
echo -n "¦ "
fi
done
if [[ $init -ne 0 ]]
then
echo -n '¦====='
else
init=1
fi
#let depth=depth+1
# treeNet[depth]=1
#prints process name
echo $(cat data | awk '{ if ($1 == '$1') print $3}' )
#printing branches
local count=0 #amount of child branches
for i in $(cat data | awk ' {if ($2 == '$1' ) print $1 } ')
do
let count=count+1
#echo $i
done
#recursive call tree()
local n=0;
for child in $(cat data | awk ' {if ($2 == '$1' ) print $1 } ')
do
let n=n+1
# echo -n " # child no $n of $count depth $depth debug ${treeNet[1]} ${treeNet[2]} ${treeNet[3]} ${treeNet[4]}";
if [[ $n -eq $count ]]
then
#echo -n " last "
treeNet[$depth]=0
fi
# echo
# let n=n+1
tree $child
done
treeNet[$depth]=0
let depth=depth-1
return 0
}
tree 1
−122
# mount /var/run or /run (DONTFIXME: obscure black magic)
mount_directory "$timestamp_base_dir" "$chroot_env_root"'/var/run'
монтирование /var/run или /run (в зависимости от дистрибутива) в chroot, тоже в /var/run или /run, в зависимости от дистрибутива в chroot
−105
Предлагаю конкурс на лучшую реализацию задачи про стеки.
Язык - bash, python или любой скриптовый.
Номинируются такие стадии
1. Ленивая стека, push - o(n) pop o(1) top o(1)
2. Забывчивая стека, push - o(1), pop o(1) top o(1), для любого l : len(l)>=n push(l,x) = l
3. Стека-очередь, push переводит стеку в режим очереди, pop переводит в режим стеки. top - O(1)
4. Маразматическая стека, map (push l) (x1,x2,x3,x4) -> [x1, x1, x3, x3] o(n), pop(l) -> (x1,x1,x4) - номер сиротливого брата определяется старшим номером брата
5. Бинарная стека - push o(1) pop o(1) top o(1), sort o(1), shuffle o(log(n))
Номинантам лучших стадий будут достанутся приз
Главное - не программировать стеку, а показывать всем, как я это делаю.
До второй стадии осталось 22 часа. Второй шаг алгоритма
−132
found_files()
{
if [ "$DAY_CONF" = 'all_last' ]; then
files=$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | grep -v `date "$DATE_PREFIX"` )
fi
if [ "$DAY_CONF" = 'last' ]; then
if [ "`date +%d`" -eq '01' ]; then
case "`date +%m`" in
02|04|06|09|11 )
need_date=31;
;;
03 )
if [ -n "$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | grep `date +%Y0229` )" ]; then need_date=29; else need_date=28; fi;
;;
* )
need_date=30;
;;
esac
if [ "`date +%m`" -eq '01' ]; then
need_month=12
need_date=31
need_year=$(( `date +%Y` - 1 ))
files=$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | grep "$need_year$need_month$need_date" )
else
need_month=$((`date +%m` - 1 ))
files=$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | egrep `date ${DATE_PREFIX%%%m*}[0]*$need_month$need_date` )
fi
else
need_date=$((`date +%d` - 1))
files=$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | egrep `date ${DATE_PREFIX%%%d*}[0]*$need_date` )
fi
fi
if [ "$DAY_CONF" = 'today' ]; then
files=$( ls -1 "$FILEPATH" | grep "$FILE_PREFIX" | grep `date "$DATE_PREFIX"` )
fi
echo $files
}
Замечательная функция поиска файлов "за вчера". Находит файлы не только "за вчера".
Автор неизвестен.
−107
#!/usr/bin/env zsh
A=( q w e r t y u i o p a s d f g h j k l z x c v b n m )
B=( Q W E R T Y U I O P A S D F G H J K L Z X C V B N M )
C=( 0 1 2 3 4 5 6 7 8 9 A B C D E F ) #hex
F=( 1 2 4 )
D=40
E=10
Char::GetRandA(){
echo ${A[$(shuf -n 1 -i 1-${#A[@]})]}
}
Char::GetRandB(){
echo ${B[$(shuf -n 1 -i 1-${#B[@]})]}
}
Char::GetRandC(){
echo ${C[$(shuf -n 1 -i 1-${#C[@]})]}
}
Char::GetRandF(){
echo ${F[$(shuf -n 1 -i 1-${#F[@]})]}
}
Main::Matrix(){
for i in {1..$D}; do
for b in {A,B,C}; do
echo -n '\033[0;3'$(Char::GetRandF)"m$(Char::GetRand$b) "
done
done
}
#Run
for i in {1..$E}; do
Main::Matrix
done
дело было вечером...
−116
#!/bin/sh
#
# $1 is the mail account
[ -n "$1" ] && {
MAIL_PATH="/Mail/$1/mbox"
OUTPUT_MAIL_PATH="/mnt/flash/save/email/inbox/"
mkdir -p $OUTPUT_MAIL_PATH
mv /var/spool/mail/root/* $MAIL_PATH
for j in `find $MAIL_PATH -name "msg.*"`
do
MAIL_NAME=`basename $j`.eml
NEW_MAIL="$OUTPUT_MAIL_PATH/$MAIL_NAME"
mkdir -p "$OUTPUT_MAIL_PATH"
[ ! -f "$NEW_MAIL" ] && {
grep "^From:" $j | head -n 1 > $NEW_MAIL
if grep "^Cc:" $j ; then
grep "^Cc:" $j | head -n 1 >> $NEW_MAIL
fi
grep "^To:" $j | head -n 1 >> $NEW_MAIL
grep "^Subject:" $j | head -n 1 >> $NEW_MAIL
grep "^Date:" $j | head -n 1 >> $NEW_MAIL
if grep "^Content-Type: text/plain;" $j ; then
LINE_NUM=`grep -n "^Content-Type: text/plain;" $j | cut -d: -f1`
if grep "^Content-Type: text/plain;" $j | grep "charset=" ; then
TYPE=`grep "Content-Type: text/plain;" $j | cut -d";" -f1`
echo "$TYPE" >> $NEW_MAIL
CHAR="charset="`grep "Content-Type: text/plain;" $j | cut -d= -f2`
echo "$CHAR" >> $NEW_MAIL
else
grep "^Content-Type: text/plain;" $j >> $NEW_MAIL
x=$(($LINE_NUM+1))
sed -n "$x"p $j >> $NEW_MAIL
fi
x=$(($LINE_NUM-1))
BOUNDARY=`sed -n "$x"p $j`
for i in `sed "/$BOUNDARY/s/.*/ffffuuuucccckkkk/" $j | grep -n "ffffuuuucccckkkk" | cut -d: -f1`
do
if [ "$i" -gt "$LINE_NUM" ] ; then
i=$(($i-1))
y=$(($LINE_NUM+3))
echo "Mail content start:" >> $NEW_MAIL
sed -n "$y,$i"p $j >> $NEW_MAIL
break
fi
done
if ! grep "Mail content start:" $NEW_MAIL ; then
echo "Mail content start:" >> $NEW_MAIL
y=$(($LINE_NUM+3))
x=`grep -c "^" $j`
sed -n "$y,$x"p $j >> $NEW_MAIL
fi
else
echo "Fuck....."
fi
}
done
}
/bin/mail.sh из прошивки букридера GreenBook