シェルスクリプト総合その24©5ch.net

2014/11/11(火) 00:54:03.43

シェルスクリプトの総合スレです。
□お約束
・特記なき場合はBourne Shell(/bin/sh)がデフォルトです。
　bash/zsh/ksh/ashなどに依存する場合は明示しましょう。
　Linuxユーザは/bin/shの正体がbashまたはdashなので特に注意。
　FreeBSDユーザは/bin/shの正体がashなので注意。
　v7 shに一番近くて、現役のshは、OpenSolaris由来のheirloom sh。
　 http://src.opensolaris.org/source/xref/onnv/onnv-gate/usr/src/cmd/sh/
　 http://heirloom.sourceforge.net/sh.html
・csh/tcshのシェルスクリプトは推奨されません。
　(理由は「csh-whynot」でググれ)
・UNIXにはシェルスクリプトに便利な小さなコマンドがいろいろあります。
　manや参考リンクを見ましょう。
　aproposないしはman -kでそれらしい単語による簡単な検索もできます。
・シェルで使えるワイルドカード等は正規表現ではありません。
　正規表現の話題はスレ違い(正規表現スレへ)
・シェルスクリプトのことをシェルってゆーな
□初心者へのアドバイス:
・適した道具を判断するのも頭の重要な使い方。シェルスクリプトよりも
　awkまたはperlの方が適した処理にはそちらを使いましょう。
・知らないコマンドが出てきたらmanを引きましょう。
・思い通りに動かないときは、まずは sh -x でトレースしましょう。
□回答者への注意事項:
・シェルスクリプトでの処理方法を質問しているのに、よくわからずに
　「そういうのはperl使いましょう」と回答するのはやめましょう。
　安易にperlに逃げずにシェルスクリプトで処理するのが頭のいいやり方。
前スレ
シェルスクリプト総合その23
http://peace.2ch.net/test/read.cgi/unix/1404204950/

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 15:29:15.99

>>624
極小ならアセンブラだろ

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 15:32:43.77

偽者の>>624は消えろ
まあこれぶっちゃけ200万レベルの仕事だね

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 15:50:06.27

アセンブラでも構いません。ARMでお願いします。
繰り返しますがわかる方のみ回答してください。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 15:58:55.20

>>626
シェルスクリプトで暗号通貨のウォレットでも作れば？

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 16:04:25.94

それはもうできています。
すみませんが質問にだけ回答してください。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 16:39:09.77

できてるならみせてよ

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 16:52:36.76

繰り返しますがわかる方のみ、質問にだけ回答してください。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 17:05:15.19

>>631
回答者以外はご遠慮下さい。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 17:07:20.51

こっちは仕事でやってるんです。
趣味で遊んでるアナタ方とは違うんです。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 17:09:47.01

そういうネタをやられては困ります。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 17:43:32.85

仕事でやってるのにまさかただとは...

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 17:56:45.03

仕事とかいうネタはやめましょうねボク。

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 18:22:50.65

仕事＝質量×距離

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 18:27:23.08

>>637
仕事＝力×距離

ネタぐらい正しく書こうね

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 18:57:31.97

>>638
仕事＝速度²×質量
だろ

**名無しさん＠お腹いっぱい。** · 2015/05/23(土) 19:02:04.07

電子工学系の者にとっては

仕事＝電圧×電流×時間

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 08:36:07.43

仕事＝電界×磁界×断面積×時間

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 09:10:55.86

金＝仕事x時間

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 09:16:37.72

∂金/∂t = ∇×仕事

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 09:43:16.72

∇・金＝０ (金は湧いてこない)

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 11:40:16.08

>>637-645
もういいんじゃない？

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 11:47:41.07

仕事×２ｃｈ＝解雇

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 13:06:10.39

シェルスクリプトで計算式記述してみてよ

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 13:18:01.71

物理量の仕事じゃなくて、こっちは本当の仕事でやってるんです。
趣味で遊んでるアナタ方とは違うんです。

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 13:29:57.13

まあどうみても>>624は趣味だけどな。

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 18:19:02.96

まちがって、

cd //

ってやったら、エラーにならずに、pwdが//になったw
どこにいたんだ？ｗｗ

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 18:24:05.92

ネットワークのトップか
そんなとこにも移動できるのか

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 18:58:32.27

>>650
bashの仕様です。今ごろ気が付いたの？

**名無しさん＠お腹いっぱい。** · 2015/05/24(日) 21:43:39.35

知らなかった

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 12:23:11.70

> bashの仕様す。
というよりは、POSIX かな

http://pubs.opengroup.org/onlinepubs/9699919799/basedefs/V1_chap03.html

3.267 Pathname
Multiple successive <slash> characters are considered to be the same as one <slash>,
except for the case of exactly two leading <slash> characters.

4.12 Pathname Resolution
If a pathname begins with two successive <slash> characters, the first component following
the leading <slash> characters may be interpreted in an implementation-defined manner,
although more than two leading <slash> characters shall be treated as a single <slash>
character.

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 12:36:39.43

英語よめんけどなんか違う

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 14:37:48.45

知識無いのに　「bashの仕様です。今ごろ気が付いたの？」　とか恥ずかしくないのだろうか

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 16:59:21.87

script書いたらすぐ行き当たる問題だし、
pwdで//が二つ出るのはbashやdashの仕様だよ。
zsh rc tclsh tcshどれも/だよ。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 19:39:52.69

>>656の人生に暗黒の1ページが加えられた瞬間に立ちあえたことに感謝w

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 20:31:48.30

ご質問です。
コマンドライン引数の数字を順番に四則演算するシェルプログラミングを
作りたいのですが、うまくいきません。
演算の順番は＋(加算)－(減算)*(乗算)/(除算)です。

#!/bin/sh

total=0
a=("$@")
n=${#a[@]}
n=$((n - 1))
while [ $n -ge 0];
do
total=$((a[$n] + $total))
n=$((n-1))
done
echo "total = $total"

自分でできたのはコマンド引数を加算のみ繰り返す処理です。
もしよい解決方法がおありでしたらご教授お願いします。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 21:12:27.93

学校の宿題か？だったら自分でやれ

**659** · 2015/05/25(月) 21:36:30.45

シェルプログラミングの教本で学び始めた、IT土方目指してるニートです。
教本に応えが載ってなくて、序盤のページで行き詰ってしまいました。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 21:46:27.07

# こんな感じで動くけどzshじゃないと動かない。後は直してね。
total=0
r=0
until test $#@ -eq 0
do
case $(( r % 4 == 0 ? 1 : (r + 3) % 4 == 0 ? 2 : (r + 2) % 2 == 0 ? 3 : 4 )) in
1) total=$(( total + $1 ));;
2) total=$(( total - $1 ));;
3) total=$(( total * $1 ));;
4) total=$(( total / $1 ));;
esac
shift
(( ++r ))
done

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 21:53:31.12

# bashで動いた。そっかzshでも$#だけでいいのか。
r=0
until test $# -eq 0
do
case $(( r % 4 == 0 ? 1 : (r + 3) % 4 == 0 ? 2 : (r + 2) % 2 == 0 ? 3 : 4 )) in
1) total=$(( total + $1 ));;
2) total=$(( total - $1 ));;
3) total=$(( total * $1 ));;
4) total=$(( total / $1 ));;
esac
shift
(( ++r ))
done

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 21:55:32.99

他にもzshだと
for a b c in 1 2 3
do
echo $a $b $c
done
みたいな処理もできる。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 22:08:26.16

最初のr=0も無くて動くか。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 22:21:07.68

ifとelseでも書けるよ。
baseの後に何が書いてあるのか分らない時は
三項演算子というのを調べると良い。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 22:21:52.93

baseじゃなくてcaseね。

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 22:37:26.67

total=$(echo "$1+$2-$3*$4/$5" | bc)
echo "total = $total"

**名無しさん＠お腹いっぱい。** · 2015/05/25(月) 23:22:22.44

自分の行為に「ご」をつけるとか、
どれだけ偉いんだって話だよな。

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 01:08:45.37

busyboxだとbcよりdcの方が都合がいいのだろうか？
まあawkでいいような気もするけど。

**659** · 2015/05/26(火) 06:28:38.16

遅くなりましたが、複数の例を挙げてもらって大変勉強になりました!!三項演算子を使う発想はなかった…

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 14:02:41.07

お世話になります。
PROMPT_COMMANDの設定について教えて下さい。

ターミナルのタイトルバーに現在のディレクトリ名"だけ"を表示したいのですが、
プロンプトの設定でやる
PS1=＼w
のような＼w がPROMPT_COMMANDの設定では使えないんですね？

どうやったらいいのでしょうか？

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 15:34:18.87

PROMPT_COMMAND="pwd"はできるから好きにやればいい

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 15:43:42.53

PROMPT_COMMAND='RSET=$(tput sgr0); B=$(tput setf 1); echo "$USER ${B}${PWD}${RSET} $"'

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 15:53:38.10

ターミナルでしたか。勘違いしていた
PROMPT_COMMAND='echo -ne "\033]0;${USER}@${HOSTNAME}: ${PWD/$HOME/~}\007"'
PROMPT_COMMAND='echo -ne "\033]0;${PWD/$HOME/~}\007"'

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 20:32:22.47

>>671
ごめん。三項演算子に間違いがあった。
(r + 2) % 2 == 0 ? 3 : 4 )) in じゃなくて
(r + 2) % 4 == 0 ? 3 : 4 )) in だった。
以下楽しくなって、もう一つ書いといた。zshでしか動かないけれど。

a=(+ - \* /)
b ()
{
(( $# == 1 )) || b $@[1,-2]
total=$(( total $a[$(( ($# + 3) % 4 == 0 ? 1 : ($# + 2) % 4 == 0 ? 2 : ($# + 1) % 4 == 0 ? 3 : 4 ))] $@[-1] ))
echo $total
}
b $@

じゃあ勉強頑張って。

**659** · 2015/05/26(火) 21:00:09.14

なぜか2で割ってるのはif文でつくり直してるときに気付きました！！
sh、zsh、bashの違いが何やら…

**名無しさん＠お腹いっぱい。** · 2015/05/26(火) 22:22:51.71

>>677
そんなあなたにbusybox

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 08:32:10.49

bashもzshも、shの機能を包括した上で拡張していて、shの構文なら共通して動くと捉えてれば良い
と思う。だからbashとzshは配列の扱いなど雑多な違いがある。以下昨日のbash版。
たぶんもっと簡素に書けるのだろうけど私も全然詳しくない。

a=(+ - \* /)
b ()
{
declare -a c=( $@ )
(( $# == 1 )) || b $( echo ${c[@]} |cut -d ' ' -f -$(( $# - 1 )) )
total=$(( total ${a[$(( ($# + 3) % 4 == 0 ? 0 : ($# + 2) % 4 == 0 ? 1 : ($# + 1) % 4 == 0 ? 2 : 3 ))]} ${c[$# - 1]} ))
echo $total
}
b $@

以下みたいな書き方も簡易な条件文。何が起こるのかは(( 1 ))した後にecho $?とかして
値を確認できる。c言語は0が偽だけどshellだと0が真なので注意。cでreturnで0返すでしょ。
さらに(( 0 ))などは、echo $?した時に0として返っていない事に注目。
(( 1 )) && echo true
(( 0 )) || echo true
自ら自らを呼ぶ、再帰関数は調べればすぐ出てくる。
declareは、再帰関数ゆえ、変数名が同じになってしまうから、関数を呼んだ側の変数の値を、
呼ばれた側が変える事が無いようにしている。ローカル変数とか、スコープとか調べると出てくる。

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 10:46:37.27

シェルスクリプトに関するご質問です。

コマンドライン引数で指定されたキーワードに一致する部分を持つ、カレントディレクトリ配下のファイルをそのディレクトリ階層をそのままにコピーしたいのですが、何かよい方法はありますでしょうか。
何かよい方法はありますでしょうか。
実行環境はCentOSをTera Term とSSH接続している状態です。

実行例として
[user@portal ~]$ ./sample.sh A copyTo　
第１引数はキーワード、第２引数はコピー先のディレクトリ

これでコピーができたことをTera Term上で確認できることが望ましいです。

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 11:05:38.31

ワイルドカード

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 13:08:06.76

>>680
#!/bin/sh
find . -name "*$1*" | cpio -oc | (cd "$2" && cpio -ivdc)

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 13:41:16.73

ワイルドカード使って自分で書いてみたらこんなのに…
#!/bin/sh
cp -Rv ["$1"] "$2"

>>682はビット演算子使っててよくわからないですが、目的の動作は確認致しました！
ありがとうございます！

**名無しさん＠お腹いっぱい。** · 2015/05/27(水) 16:04:06.52

わざとトンチンカンなこと言ってんのかな

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 10:32:09.00

>>663のやつ整数しか計算できないし、第1引数を0に足してるで
第1 + 第2 - 第3 * 第4 / 第5 + 第6 -　…
って処理が正しい

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:07:05.77

# こうすると動くよ。後は引数を実数にしてね。
total=$1; shift
a=(+ - \* /)
b ()
{
(( $# == 1 )) || b $@[1,-2]
total=$(( total $a[$(( ($# + 3) % 4 == 0 ? 1 : ($# + 2) % 4 == 0 ? 2 : ($# + 1) % 4 == 0 ? 3 : 4 ))] $@[-1] ))
echo $total
}
b $@

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:23:47.19

そっか、%つかってるんだった。
まぁ本人じゃないだろうし引かせてもらおう。

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:25:16.28

おそらく663のcodeに
total=$1; shift
だけでいいんじゃないかな。急ぎなので、確認して無いけど。

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:32:06.05

いや%と関係ないか。$#にたいしてだったね。

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:32:46.85

>>659
自分も、参考までに考えておいた
初期値は 0、引数の数は不定で、加算、減算、乗算、除算を繰り返すと解釈した

#! /bin/sh -x
while
total=$(
echo "( ${total:-0} ${1:++ $1} ${2:+- $2} ) ${3:+* $3} ${4:+/ $4}" | bc
)
[ 4 -lt $# ] && shift 4
do :
done

echo "ANSWER: ${total}"
exit

#! /bin/sh -x
while [ 0 -lt $# ]
do
total=$(
echo "( ${total:-0} + ${1:- 0} - ${2:- 0} ) * ${3:- 1} / ${4:- 1}" | bc
)
shift $(( $# > 4 ? 4 : $# ))
done

echo "ANSWER: ${total:-0}"
exit

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 12:35:03.52

ああ、せっかく全角スペースで字下げしたのに、間違えてただのスペース打ち込んだか

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 18:17:15.57

# 他の人のレスは後で確認する。なんだか覚醒してきた。dashで動くように作った。
# 以下をtest.shで保存。
#!/bin/sh
a='/+-*'
test $# -eq 1 && { echo $1; exit; } || total=$( ./test.sh $( echo $@ |cut -d ' ' -f -$(( $# - 1 )) ) )
echo $(( $total $( echo $a |cut -b $(( ( $# + 3 ) % 4 + 1 )) ) $( eval echo \$$#) ))

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 21:33:17.29

大きな数の余りの計算とかできる？

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 21:54:55.27

# 今その要求にshellだけで答えるように考えてる。
# 割り算部分はできたよ。もう疲れたからやめようかな。
# scaleの値を調整すれば何処まで計算するか指定できる。
# -の値を指定するとずっと計算し続けるので注意。
# dashで動くように書いてる。

#!bin/sh
scale=8
total=$1; shift

m ()
{
test $(( $3 )) -eq 0 -o $(( $1 )) -eq 0 && return
b=$1
a=$(( ${b}0 / $2 ))
echo -n $a
m $(( ${b}0 % $2 )) $2 $(( $3 - 1 )) # 余り、割る数、scale.
}
echo -n $(( total / $1 )).
m $(( total % $1 )) $1 $scale

**名無しさん＠お腹いっぱい。** · 2015/05/28(木) 22:03:27.91

使い方書いてなかった。
./保存したfile 355 113
と引数二つです。

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 02:54:31.46

よし諦めた。

>>690 本人じゃなくてわめいてる方ですけど、勉強になります。
一つ目書き方は知らないので勉強しておく事して二つ目ので見ると、
そっか、と思わされました。確かにその通りだと、コードも短いし理解もしやすいし。

>>659は彼のを参考にしたほうが良かと。私のは今考えて見ると三項演算子も無駄だったし、
ただ>>692は毒毒しい事をしているので、結構勉強になると思う。

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 13:11:54.28

#!/bin/sh
# ごめん>>694 それ再帰してるから途中で計算できてなかった。
# 悪い所も無駄に関数な所も直して無いけど。以下でいける。
scale=-1
total=$1; shift

m ()
{
b=$1 # $1: 余り、$2: 割る数、$3: scale.
until test $scale = 0 -o b = 0
do
a=$(( ${b}0 / $2 ))
echo -n $a
b=$(( ${b}0 % $2 ))
scale=$(( scale - 1 ))
done
}
echo -n $(( total / $1 )).
m $(( total % $1 )) $1 $scale

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 13:15:06.25

やば>>697まさかの$3 scale意味ない説。

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 14:07:59.50

いやコメント内で使ってたか。

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 17:25:17.77

なるほどdo whileみたいに使えるだね。
while false
true
do
echo test
break
done
前にfor分は以下で動くのになんでwhileは駄目なんだろうと思った、謎がとけました。
for r in *
{
echo $r
}

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 17:41:57.11

ふむ、whileから最後の戻り値の間、do doneの間を回るわけだからdo whileとはまた違う。

離れ隠しとも名付けようかこの新手

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 19:43:00.94

>> 696
> >>690 本人じゃなくてわめいてる方ですけど、勉強になります。
意外な効果で驚くなあ。でも、役に立って良かった

> 一つ目書き方は知らないので勉強しておく
って言葉で改めて見直すと

> 序盤のページで行き詰ってしまいました。
序盤で行き詰まっているんだよね。そんな人に対して適当な回答じゃあ無かったかもしれないなあ
( parameter substitution の機能とか使うべきではなかったか )と思い、妙なヒント入りでもう一度書いておきました

蛇足だけど、V7 Bourne Shell だと、:- でなく - なんだよね
http://www.in-ulm.de/~mascheck/bourne/v7/
> ${parameter-word}
> If parameter is set then substitute its value; otherwise substitute word.

それでなのか、POSIX でも定義されていて
http://pubs.opengroup.org/onlinepubs/9699919799/utilities/V3_chap02.html#tag_18_06_02

bash や、dash でも echo ${HOGE-$HOME} が機能する

>>701
man dash, man bash, man ksh, man zshmisc と確認してみたけど
while list; do list; done 相当の事が書いてある
結構誰でも知っているて、新手では無いよ

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 19:44:12.32

#! /bin/sh -x
total=0
while
　case $# in
　0)
　　break
　;;
　1)
　　total=$( echo "${total} + $1" | bc )
　　break
　;;
　2)
　　total=$( echo "( ${total} + $1 - $2 )" | bc )
　　break
　;;
　3)
　　total=$( echo "( ${total} + $1 - $2 ) * $3" | bc )
　　break
　;;

**名無しさん＠お腹いっぱい。** · 2015/05/29(金) 19:44:26.35

　4)
　　total=$( echo "( ${total} + $1 - $2 ) * $3 / $4" | bc )
　　break
　;;
　[5-9]|[0-9]*[0-9])
　　total=$( echo "( ${total} + $1 - $2 ) * $3 / $4" | bc )
　　shift 4
　　true
　;;
　*)
　　echo 'It never comes here and we know it.' >&2
　　exit 1
　;;
　esac
do : 'Do nothing with list-2 of "while list-1; do list-2; done"'
done

echo "ANSWER: ${total}"
exit

**名無しさん＠お腹いっぱい。** · 2015/05/30(土) 04:04:02.38

# おかげさまで、また少し成長できました。

#!/bin/zsh
eval echo -n \${$#..1} \'$( yes '+-*/'|tr -d '\n' |dd bs=$(( $# - 1)) \
count=1 cbs=1 conv=unblock 2>/dev/null | sed 's#^#r#')\' p |dc

#!/bin/sh
{ eval echo -n $( seq -f "$%g" $# |tac ); echo "$( yes '+-*/'|tr -d '\n' \
|dd bs=$(( $# - 1)) count=1 cbs=1 conv=unblock 2>/dev/null | sed 's#^#r#' )" p; } |dc

**名無しさん＠お腹いっぱい。** · 2015/05/30(土) 07:57:05.78

なんか凄いもの練り上げたね。なんか、スクリプトを書く 705 の楽しさが伝わってくるわｗ

eval echo $( seq -f "$%g" $# | tac )
の部分は "$@" とか使えないものかと思い、しばらく考えたんだが...

echo "$@ " | tac -s " "

**名無しさん＠お腹いっぱい。** · 2015/05/31(日) 07:18:32.49

# 書けて良かった。

#!/bin/sh
eval echo 0 $( printf '$%d + $%d - $%d @ $%d /' $( seq $# ) | \
sed 's#+ $0#+ 0#g; s#- $0#- 1#g; s#@ $0#@ 1#g; a p' ) |tr '@' '*' |dc

**名無しさん＠お腹いっぱい。** · 2015/05/31(日) 08:54:03.31

>>705
後段も書き換えてみた
echo "$( yes '+-*/'|tr -d '\n' \
|dd bs=$(( $# - 1)) count=1 cbs=1 conv=unblock 2>/dev/null | sed 's#^#r#' )" p

#! /bin/sh
# 何をするスクリプトかぱっと見で全くわからないので、一応書いておくけど、
# これも >>659 の回答
{
　echo "$@ " | tac -s " "
　yes 'r+r-r*r/' | tr -d '\n' | head -c $(( ( $# - 1 ) * 2 ))
　echo "p"
} | dc

>>707
アイデアが尽きないね。@は、エスケープ用かな？外しておいた

#! /bin/sh
eval echo 0 $(
　printf '$%d + $%d - $%d \\* $%d / ' $( seq $# ) |
　sed 's#+ $0#+ 0#g; s#- $0#- 1#g; s#* $0#* 1#g; a p'
) | dc

**名無しさん＠お腹いっぱい。** · 2015/05/31(日) 11:51:51.69

大きな数の計算できるならRSA暗号化もできるんじゃないか？

**名無しさん＠お腹いっぱい。** · 2015/05/31(日) 12:23:30.92

整形ついでに sed を整理してみた
eval とかなるべく使いたくないけど、printf で展開するアイデアが面白いな

#! /bin/sh
{
　eval echo 0 $(
　　printf '$%d + $%d - $%d \\* $%d / ' $( seq $# ) |
　　　sed -e 's/$0 [+/*\-]* //g'
　)p
} | dc

**名無しさん＠お腹いっぱい。** · 2015/05/31(日) 18:16:33.13

ちょっと危なっかしいけど、これで eval も外せたかな？

#! /bin/sh
{
　echo 0 $(
　　n=$(( $# % 4 ))
　　printf '%d + %d - %d \\* %d / ' "$@" |
　　　sed -e 's/$[0-9]\{1,\} [+/*\-]* $\{'"$(( n == 0 ? 0 : 4 - n ))"'\}$//'
　)p
} | dc

**名無しさん＠お腹いっぱい。** · 2015/06/01(月) 06:34:30.80

エスケープを外す前の方で書き込んでいた

訂正
#! /bin/sh
{
　echo "0 $(
　　n=$(( $# % 4 ))
　　printf '%d + %d - %d * %d / ' "$@" |
　　　sed -e 's/$[0-9]\{1,\} [+/*\-]* $\{'"$(( n == 0 ? 0 : 4 - n ))"'\}$//'
　)p"
} | dc

**名無しさん＠お腹いっぱい。** · 2015/06/02(火) 19:51:41.64

連投スマソ。printf 見直した

#! /bin/sh
echo "0 $( printf '%s + %s - %s * %s / ' "$@" "END" | sed -e 's/END.*$//' )p" | dc

**名無しさん＠お腹いっぱい。** · 2015/06/02(火) 20:48:50.22

もうずいぶん前から計算違ってる

**名無しさん＠お腹いっぱい。** · 2015/06/04(木) 06:35:03.60

解釈の違いだろ。echo も省いた

printf '%s + %s - %s * %s / ' "$@" "END" | sed -e 's/^/0 /; s/END.*$/p/' | dc

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 17:40:55.66

先生のcodeを勉強する前に作っておきました。
ここのpageを見て理解しながら作りました。
http://www.maitou.gr.jp/rsa/
素数判定のアルゴリズムは以下のC言語のものを、冪乗の計算を一度に変えたものです。
http://ja.wikipedia.org/wiki/%E7%B4%A0%E6%95%B0%E5%88%A4%E5%AE%9A
今は一度コメントを全部消した状態で貼っておきます。
dcで書いてるので呪文っぽいので理解しようとしないほうが吉です。
そのうちbase64でコメントつけて貼るかもしれません。
factorにすぐやられますから、実用性は無いです。
dashで動くつもりでしたがzshでなければ動きません。
printf %d 010
とした時の挙動の違いに今気付きました。

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 17:42:57.23

# $1から$2の範囲の素数を出力します。$2が省略された場合は$1一つの数に対して判定します。
# 例: prime 10000 20000
prime ()
{
dc -e "$( seq $1 ${2:-$1} )"'
z sc 0 sr [S2 lr 1 + sr lr lc >!] s! l! x
[[sg 3 Q] sk [p sg 3 Q] s.] sA
[d 2 >k d 2 =. d 2 % 0 =k] sB
[[sg 2 Q] sk [p sg 2 Q] s. d v s^ 3 s/] sC
[l^ l/ >. d l/ % 0 =k l/ 2 + s/ lD x] sD
0 sr
[L2 [lA x lB x lC x lD x]x lr 1 + sr lr lc >@] s@ l@ x
'
}

# 上記、prime関数から得られた適当な素数二つが引数です。
# そこから秘密鍵、公開鍵を出力します。
# 例: keygen 10243 19963
keygen ()
{
dc -e "[$1 1 :a]x [$2 2 :a]x [$1 $2 * 3 :a]x"'
[1 ;a]x 1 - [2 ;a]x 1 - * 2 / 1 + S2
[l2 lr [d la :k]x / [la :p]x la 1 + sa l. x] sA
[[la 1 - ;k]x n [ ] n [la 1 - ;p]x n [ ] n [3 ;a]x p sg] s.
1 sa l2 v s^ 2 sr
[l2 lr % 0 =A lr 1 + sr lr l^ !<B] sB lB x
'
}

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 17:44:29.67

# 上記、keygenが出力した鍵から適当な一段を使い暗号化し、出力します。
# 例:
# keygen 10243 19963
# > 7 14603629 204481009
# > 17 6013259 204481009
# > 119 859037 204481009
# encrypt 859037 204481009 暗号化するfile >暗号化した後のfile
encrypt ()
{
echo 8 o $( printf "8 i %d 12 i $1 $2 | n [ ] n " $( od -vt oC -A n $3 ) ) |dc
}

# 上記の公開鍵で暗号化したものを、秘密鍵で復号します。秘密鍵は上記の例で暗号化した場合、
# 以下の組み合わせになります。
# encrypt 119 204481009 暗号化されたfile >復号化した後のfile
decrypt ()
{
printf "8 i %d 12 i $1 $2 | P " $( cat $3 ) |dc
}

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 20:13:54.61

ごめんなさい。素数と素数をかけた数が512以下だと復号に失敗します。

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 20:27:58.37

# 以下じゃなくて未満か。

# 他に、確認に使ったprogram.
# ずるしてopensslを使っています。

# まず!!!!!!!!復号化するfileに値を入れて下さい!!!!!!!!!!!!!。小さいfileが良いと思います。
# mktempで作るfileは自動では削除しません。最初にechoで出力するので手動でお願いします。

# primeで適当な素数を二つ選択しkeygenを行い、そこで作られた鍵で暗号化したfileを
# 復号できるかの確認です。
# 使い方。
# check_2 $( prime 10000 20000 )

# 出力は、出力した時に確認したkeygenに使った素数二つ,暗号化復号化に使える数字と法です。

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 20:29:33.71

file=
file_encrypt=$( mktemp )
file_decrypt=$( mktemp )
echo 後で削除する事、$file_encrypt $file_decrypt
check_2 ()
{
test $# -lt 2 && return

p1=$( echo $@ |tr ' ' '\n' |sed -n $(( $( openssl rand 2 \
|od -t u -A n ) % $# + 1 ))p )
while # 使いました!!!
p2=$( echo $@ |tr ' ' '\n' |sed -n $(( $( openssl rand 2 \
|od -t u -A n ) % $# + 1 ))p )
test $p2 -eq $p1
do :
done

f ()
{
test $# -eq 0 && return
encrypt $(( $# % 2 ? $1 : $2 )) $3 $file >$file_encrypt
decrypt $(( $# % 2 ? $2 : $1 )) $3 $file_encrypt >$file_decrypt
diff $file $file_decrypt && echo 成功。keygen $p1 $p2, $1 $2 $3 \
|| echo 失敗。keygen $p1 $p2, $1 $2 $3 1>&2
shift 3
f $@
}
f $( keygen $p1 $p2 )

check_2 $( echo $@ |tr ' ' '\n' |grep -vE "($p1|$p2)" )
}
# rm $file_encrypt $file_decrypt

**名無しさん＠お腹いっぱい。** · 2015/06/06(土) 20:36:41.36

もっと大きい値で確認する場合は、
opensslのrandの値も変える必要があったような気がします。もう忘れました。
現在対したコメント無くてごめんなさい。

**名無しさん＠お腹いっぱい。** · 2015/06/07(日) 19:13:41.49

>>715 から sed も取り除いてみました
printf '%s + %s - %s * %s / ' '0 0' 0 1 1 "$@" 'p quit' | dc

>>716-722 力作ですなぁ

**１０人に１人はカルトか外国人** · 2015/06/08(月) 17:47:19.33

●マインドコントロールの手法●

・沢山の人が偏った意見を一貫して支持する
　偏った意見でも、集団の中でその意見が信じられていれば、自分の考え方は間違っているのか、等と思わせる手法

・不利な質問をさせなくしたり、不利な質問には答えない、スルーする
　誰にも質問や反論をさせないことにより、誰もが皆、疑いなど無いんだと信じ込ませる手法

偏った思想や考え方に染まっていたり、常識が通じない人間は、頭が悪いフリをしているカルト工作員の可能性が高い

靖国参拝、皇族、国旗国歌、神社神道を嫌うカルト

10人に一人はカルトか外国人

「ガスライティング」で検索を！

シェルスクリプト総合 その24©5ch.net

シェルスクリプト総合その24©5ch.net