【堅牢】トリップの新方式を考えてみませんか【互換性】
レス数が1000を超えています。これ以上書き込みはできません。
現段階でのトリップの問題点などを考えつつ、
現行方式よりも堅牢なトリップの方式を考えてみませんか。
マルチバイト文字問題や互換性などの問題も出てくると思いますが、
そこは皆で妙案を出し合いつつ、新たな方式を頑張って考えてみましょう。
関係スレ
幸せサーバープロジェクト 「アイデア・技術のある人募集中」★3
http://qb5.2ch.net/test/read.cgi/operate/1241361889/ perlってことはどこでも動くね。
こりゃすごいとか言ってみるテスツ >>928
##### ignore case #####
if ($ignore_case){
えーっ、、、
おそらく速度的には変わらないと思うけれどもこの辺りに。。。
つ print "$tript#$key2n" if m!(?($ignore_case)(?i)$pattern|$pattern)!o;
変更するときに複数箇所同じ変更をしなきゃいけない描き方は、あとでえらい目に遭います♪ >>947
つ print "$tript#$key2n" if m!(?($ignore_case)(?i)$pattern|$pattern)!o; ×
使い方が違います(´・ω・`) $pattern = qq|(?i)$pattern| if $ignore_case;
して・・・
print "$tript#$key2n" if m!$pattern!o;
かなかな。。。 >>949
すでに頭が固まっている、、、
× print "$tript#$key2n" if m!$pattern!o;
○ print "$tript#$key2n" if $trip =~ m!$pattern!o;
"$c1$c2$c3$c4"は、固定値なので本ループの前にあらかじめ作っておくと良いかも♪ >>888
中の人じゃないけどi386/x86_64/ppc/ppc64のユニバーサルなのを作り中。
いずれもシングルスレッドで
Core 2 Duo 2.3GHz (Leopard):
i386+sse2: 7.5M trip/sec
x86_64+sse2: 10.5M trip/sec
G5 2.0GHz (Tiger):
ppc+altivec: 4.6M trip/sec
ppc64+altivec: 4.75M trip/sec
G4 667MHz (Panther):
ppc+altivec: 1.48M trip/sec
これに前方一致とかキーのイテレーションとかログ記録を追加するから
完成品でどれぐらい性能が維持できているかは不明。 >>950
やっぱり頭が固まっている、、、
"$c1$c2$c3$c4"は、固定値なので本ループの前にあらかじめ作っておくと良いかも♪
↓
my @chars = (aaaa .. zzzz);
1行でおわりだた。。。 >>954
なんのためにコテつけてると思ってるんだ
さっさとNGにしちゃえば金輪際見なくてすむのに >>953
# 10053472 Trips in 57 sec - 176 kTrips/sec
↓
# 10053472 Trips in 45 sec - 223 kTrips/sec
ちょっぴり速くなりました♪ マルチで失礼
SSEとかは使いこなせないのであんまり速くないですが
ttp://www1.axfc.net/uploader/Sc/so/11313
ついでに言うとマルチコア非対応ですけど… ほぉほぉ。。。
# 10053472 Trips in 16 sec - 628 kTrips/sec
Core 2 Duo E7200 @ 2.53GHz/Vine4.2 >>949-950
そんな便利なパターンマッチの書き方があったのかや。
>>951
やはりSIMDは凄いの。
>>953
巨大な配列を避けてしまうのはわっちの頭が古いのかもしれんの。
本当はとりあえず動く物を作ったのが一番の理由だがの w >>961
20s, 1226.282ktrips/s
早いな >>961
2500k/s
E8500
位置指定がないと半分以下に >>961
txで15 MのPCで3Mだからまあまあ優秀なんじゃね?
乙 >>961
挙動が好み♪
だいたいAve500Kくらい出てます。 >>961
先頭指定で1個 2600k/s
E5200 2.5GHz >>961
もらいました。ありがとうございます><
^AAAAAAAA〜^ZZZZZZZZ^aaaaaaaa〜^zzzzzzzz^........^////////
で1038k
^TRIP
で2587k
コア2デュオ 2.0GHz メモリ1.5GB
見知らぬヴァルダのトリッパー Ver1.2a
20.5k/s
>>928
180k/s
>>961
900k/s
早いww >>961
乙。古いCPUでも早いね。
先頭指定 : 2418.175ktrips/s
位置指定無: 2009.041ktrips/s
Athlon64 3700+ 2.4GHz >>961
1494k/sで安定したー
@Turion64 MT-28 1.6GHz このスレに張られたツール使ったらTmpフォルダに色々溜まってたwww
1個のフォルダにまとめませう >>961
今まで使ってたtarget.txt使えるのが良かった。
いいトリップ早く見つからないかな。 >>961
ありがとうございます
低スペックでも使えますね >>961
おお、すごい
ただ、かなり速度低下しやすいね。ターゲットを工夫しないとなー >>961
ピリオドの前にエスケープは必要ですか? >>890 の奴が使えないかと見ていたのだが、余計な処理が入ってて使えなさそうなことが分かった。残念。 ttp://www1.axfc.net/uploader/Sc/so/11425
久々にPerlについて調べていたらこんな時間になっておった。
大文字小文字を無視する場合は、パターンの先頭に(?i)を付けてくりゃれ。
速度では勝負になりそうに無いからの、マニア向けの方が面白そうじゃろ。 ほんとのところ、Tripcode Explorer 2(仮)はGUI設計に専念しようと思ってたんだよね
ユーザーインターフェイス設計とアルゴリズムチューニングって同時には頭まわんねー。
誰かコラボする? >>961
いただきました
明日4400+で12個検索して1.4M出てますよ >>990
そのロゴをキレイなビットマップでください >>961
いただきました。
ソース勉強になります。 このあたりを利用すればもっと速くなるかなぁ
ttp://www.iacr.org/cryptodb/archive/2005/CRYPTO/1826/1826.pdf >>990
いま制作中だから待ってなさい
今日or明日には完成する >>987
若干速度が上がりました♪
#!/usr/bin/perl --
use strict;
use Digest::SHA1 qw(sha1_base64);
use Time::HiRes qw(time);
if (! $ARGV[0] || $ARGV[0] =~ m/^-/){
print "usage: $0 search_patternn";
exit -1;
}
my ($key, $trip, $count, $t1, $pattern) = (undef, undef, 0, time, shift);
$pattern =~ tr/"//;
$| = 1;
while (1){
$key .= ('A' .. 'Z', 'a' .. 'z')[int rand 52] for (1 .. 8);
foreach ('AAAA' .. 'ZZZZ', 'aaaa' .. 'zzzz'){
$trip = substr(sha1_base64("$key$_"), 0, 12) and $count++;
$trip =~ tr/+/./;
$trip =~ m/$pattern/o and print "$tript#$key$_n";
}
my $t3 = time - $t1;
printf STDERR "# %d Trips in %f sec - %f kTrips/secn", $count, $t3, $count/$t3/1000;
($key, $count, $t1) = (undef, 0, time);
}
exit 0;
>>990
っつっても今は外出厨だからね
帰ってから
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。 レス数が1000を超えています。これ以上書き込みはできません。