メモその２。
例1：16進数 A5 を 10進数に。
まず、10進数と16進数の対応を確認。
| 10進数 | 16進数 |
|---|---|
| 0 | 0 |
| 1 | 1 |
| 2 | 2 |
| 3 | 3 |
| 4 | 4 |
| 5 | 5 |
| 6 | 6 |
| 7 | 7 |
| 8 | 8 |
| 9 | 9 |
| 10 | A |
| 11 | B |
| 12 | C |
| 13 | D |
| 14 | E |
| 15 | F |
各桁数-1を16の乗数として、それに16進数が対応する10進数をかけたものを最後に足す。
A(10) × 161
5(5) × 160
⇒ 165
例2：10進数 251 を 16進数に。
10進数の数字を16で割っていき、その商が0になるまで繰り返す。各あまりを下から順に並べて、16進数で置き換える。
251 ÷ 16 ＝ 15 あまり 11 (B)
15 ÷ 16 = 0 あまり 15 (F)
⇒ FB
メモ。
例1：10進数 15 を ２進数に。
10進数の数字を2で割っていき、その商が0になるまで繰り返す。各あまりを下から順に並べると10進数になる。
15 ÷ 2 = 7 あまり 1
7 ÷ 2 = 3 あまり 1
3 ÷ 2 = 1 あまり 1
1 ÷ 2 = 0 あまり 1
⇒ 1111
例2：10進数 32 を ２進数に。
32 ÷ 2 = 16 あまり 0
16 ÷ 2 = 8 あまり 0
8 ÷ 2 = 4 あまり 0
4 ÷ 2 = 2 あまり 0
2 ÷ 2 = 1 あまり 0
1 ÷ 2 = 0 あまり 1
⇒ 100000
例3：2進数 10011 を 10進数に。
各桁数-1を2の乗数として、それに２進数をかけたものを最後に足す。
1×24 = 16
0×23 = 0
0×22 = 0
1×21 = 2
1×20 = 1
⇒ 19
いかんいかん、XBOX360の「FIFA09」が出たせいでサボりまくり、、、
気分を取り直してがんばります。金曜日は「C言語」。今日は文字列です。
#include <stdio.h>
int main()
{
char s[5];
s[0] = 'a';
s[1] = 'b';
s[2] = 'c';
s[3] = '\0';
printf("%s\n", s);
return 0;
}ポイントをいくつか。
#include <stdio.h>
int main()
{
char s[] = {'a', 'b', 'c'};;
printf("%s\n", s);
return 0;
}この場合はサイズの宣言は不要。よしなにやってくれる。#include <stdio.h>
int main()
{
char s[] = "abc";
printf("%s\n", s);
return 0;
}一番普通。#include <stdio.h>
#include <string.h>
int main()
{
char s[4];
memset(s,'a',3); /* 1: 代入する配列、2:文字、3:文字数 */
s[3] = '\0'; /* 最後にEOSを代入。面倒、、、 */
printf("%s\n", s);
return 0;
}うーん、やっぱり文字列の扱いは面倒だなぁ、特にサイズを意識しないといけないってのは厳しい。十分に気をつけるようにして次へ進みましょう。次回は「ファイル入出力」。やっと実際のプログラミングらしくなってきました。
外山先生の本を読むのは大学入試以来だったりしますw
読書論、的な本を探してたら、とあるブログで紹介されていた『「読み」の整理学』がなかなか面白かったので、続けてこれをチョイス。
もう10年近く前の本だけど、今読むととてもLifehacks的。紹介されている内容も実践的で手軽に試せそうなものが多くて、でもとても読みやすい、ただちょっと繰り返しが多いかな。『「読み」の整理学』とちょっとかぶってるところもあったりするし。なのでザーッと目を通す程度で読むのが一番いい気がします。でも豊富な例証がさすが外山先生という感じです。
早速気になったところだけピックアップ。
文庫本なのですぐに読めちゃうし安いんでサラッと読みたい場合はおすすめです。
読書論に限ると↓もおすすめ。
ここんところちょっと仕事が忙しくて帰ってきたら勉強する気ゼロなことが多いんですが、そんな中最近の一番の勉強スポットはお風呂だったりしてます。いやー、高い本は気を使いますw
ということで、昨日月曜日の『Perl』の時間の成果をアップします。引き続きsed編。sed編はこれが最後です。
$ echo "abc" | perl -wpl -e 's/^.*$/\U/g;' ← 大文字変換
ABC
$ echo "ABC" | perl -wpl -e 's/^.*$/\L/g;' ← 小文字変換
abcあと、\u と \l は隣の1文字だけを変換。$ perl -e 'print "this is \Ucapital\E letters.\n";'
this is CAPITAL letters.$ echo "20 miles 14" | perl -wp -e 's/^(\d+) miles$/$1 * 1.6 . " km"/e;'
32 km$ echo "this is a tab-separeted sentence." | perl -wp -MText::Tabs -e '$tabstop = 2; s/^.*$/expand $&/eg'
this is a tab-separeted sentence.次はawkです。これで文字列処理系のコマンドは全部置き換えられちゃうなー。
ここ2、3日格闘していた、ポインタですが、なーんとなく少し壁は超えれたような気がするので、わかってるところだけでもちょっとまとめてみます。あくまでも、なーんとなくのレベル。
ポインタ
int *pval;int *pval;
int val;
pval = &val;int val = 10;
int *pval;
pval=&val;
printf("%d¥n",*pval);
結果は”10″が出力される。void pointer_func( int *x, int *y )関数の呼び出し：pointer_func( &a, &b )関数内で値を参照：int val = *a;配列とポインタ
int ary[] = { 1, 2, 3 };
int *pval;
pval = ary;※上の続き
printf("%d¥n", *pval);結果は1となり、ary[0]の値となる。#include <stdio.h>
int main()
{
int *p;
printf("%p\n", p );
p += 1;
printf("%p\n", p );
return 0;
}結果は0x1000
0×1004となる。#include <stdio.h>
int main()
{
int ary[] = {
1,
5,
8
};
int *p;
p = ary;
printf("%p:%d\n", p, *p );
printf("%p:%d\n", p+1, *(p+1) );
printf("%p:%d\n", p+2, *(p+2) );
return 0;
}結果：0xbffff9f0:1
0xbffff9f4:5
0xbffff9f8:8アドレスは４バイトずつ(僕の環境では)増えて、配列の要素を順に参照している。#include <stdio.h>
int main()
{
int ary[] = {
1,
5,
8
};
int *p;
p = ary;
int i;
for( i=0; i<(sizeof ary / sizeof ary[0]); i++ )
printf( "%d:%p:%d\n", i, p, *p++ );
return 0;
}結果は同じ0:0xbffff9f0:1
1:0xbffff9f4:5
2:0xbffff9f8:8 for( i=0; i<(sizeof ary / sizeof ary[0]); i++ )
printf( "%d:%p:%d\n", i, &p[i], p[i]);結果はこれまた同じ。0:0xbffff9ec:1
1:0xbffff9f0:5
2:0xbffff9f4:8つまり、配列のようにインデックスで指定して、元の配列要素の値を取得できる。include <stdio.h>
int main()
{
int ary[] = {
1,
5,
8
};
int i;
for( i=0; i<(sizeof ary / sizeof ary[0]); i++ )
printf( "%d:%d\n", i, *(ary+i) );
return 0;
}結果はこうなる。0:1
1:5
2:8配列の各要素に、ポインタで使った逆参照演算子*を使って値を参照することができる。int ary[];
sample func(ary)int sample_function(int a[]){
・・・
}サンプルコード：#include <stdio.h>
int max(int a[], int size);
int main()
{
int ary[] = {
1,
5,
8
};
int val;
val = max( ary, sizeof ary / sizeof ary[0]);
printf("%d\n",val);
return 0;
}
int max(int a[], int size)
{
int max = a[0];
int i;
for(i = 1;i<size;i++)
if(max < a[i])
max = a[i];
return max;
}int sample_function(int *a){
・・・
}サンプルコード：#include <stdio.h>
int max(int *a, int size);
int main()
{
int ary[] = {
1,
5,
8
};
int val;
val = max( ary, sizeof ary / sizeof ary[0]);
printf("%d\n",val);
return 0;
}
int max(int *a, int size)
{
int max = a[0];
int i;
for(i = 1;i<size;i++)
if(max < a[i])
max = a[i];
return max;
}#include <stdio.h>
int arynum(int a[]);
int main()
{
int ary[] = {
1,
5,
8
};
int val;
val = arynum( ary );
printf("%d\n",val);
printf("%d\n",sizeof ary / sizeof ary[0]);
return 0;
}
int arynum(int a[])
{
int num;
num = sizeof a / sizeof a[0];
return num;
}結果は以下。1
3ふぅー、途中ちょっと別の本も読んでみたりしつつでしたが、何度か繰り返し読んで、サンプルコードを自分で書いてみて、そんなこんなしてるうちに何となくわかってきました。やっぱり「何度も読む」ことで見えてこなかったものが少しずつ見えてくるんだよね。とりあえず最大の難関を終えてホッとしました。
次回は「文字列と文字配列」です。
水曜日は『サーバ』の時間です。今日はちょっと趣向を変えて、「9Arrows」というプロジェクト管理ツールを試してみようということで、それを動かすのに必要な「Ruby on Rails」のインストールにトライしてみたいと思います。でもRailsはさっぱりわからないので、9Allowsが最低限動けばOKとします。環境はもちろん CentOS5.2。OSのインストールからの最短手順を目指します。
OSインストール
epelパッケージインストール
RailsのパッケージがEPELにあるのでこれを使うために、まずepelを使えるようにする。
# wget http://download.fedora.redhat.com/pub/epel/5/i386/epel-release-5-3.noarch.rpm
# rpm -ivh epel-release-5-3.noarch.rpmRuby on Railsパッケージインストール
# yum install rubygem-railsこれで必要なパッケージは全部インストールされるっぽい↓Dependencies Resolved
=============================================================================
Package Arch Version Repository Size
=============================================================================
Installing:
rubygem-rails noarch 2.1.1-2.el5 epel 428 k
Installing for dependencies:
ruby i386 1.8.5-5.el5_2.5 updates 279 k
ruby-irb i386 1.8.5-5.el5_2.5 updates 69 k
ruby-libs i386 1.8.5-5.el5_2.5 updates 1.6 M
ruby-rdoc i386 1.8.5-5.el5_2.5 updates 136 k
rubygem-actionmailer noarch 2.1.1-1.el5 epel 455 k
rubygem-actionpack noarch 2.1.1-1.el5 epel 2.1 M
rubygem-activerecord noarch 2.1.1-1.el5 epel 1.4 M
rubygem-activeresource noarch 2.1.1-1.el5 epel 176 k
rubygem-activesupport noarch 2.1.1-1.el5 epel 1.3 M
rubygem-rake noarch 0.7.3-2.el5 epel 320 k
rubygems noarch 1.2.0-2.el5 epel 617 k
Transaction Summary
=============================================================================
Install 12 Package(s)
Update 0 Package(s)
Remove 0 Package(s)
Total download size: 8.9 M
Is this ok [y/N]:ただし、rakeのバージョンが低すぎてRailsでエラーになる様子。# rails -v
/usr/lib/ruby/site_ruby/1.8/rubygems.rb:578:in `report_activate_error': RubyGem version error: rake(0.7.3 not >= 0.8.1) (Gem::LoadError)なので、rakeだけはgemsからインストールする。最新版のrakeをインストールしてみる。# gem install rake --version 0.8.3確認# gem list
*** LOCAL GEMS ***
actionmailer (2.1.1)
actionpack (2.1.1)
activerecord (2.1.1)
activeresource (2.1.1)
activesupport (2.1.1)
rails (2.1.1)
rake (0.8.3, 0.7.3)その他のパッケージのインストール
9Arrowsが必要とする他のパッケージをインストールする。
# yum install httpd
# chkconfig httpd on
# service httpd on# yum install postgresql-server ruby-postgres
# chkconfig postgresql on
# service postgresql startこのままだとローカルホストからIDENT認証しかできず結果的にRailsから接続できないので、/var/lib/pgsql/data/pg_hba.confを編集する。# vi /var/lib/pgsql/data/pg_hba.conf
---–
#host all all 127.0.0.1/32 ident sameuser
host all all 127.0.0.1/32 password
---–再起動# service postgresql restart9arrowsのインストール＆設定
では9arrowsをインストール＆設定していきます。
# yum install subversion
# svn checkout http://9arrows.googlecode.com/svn/trunk/ 9arrows-read-only# cp -pir 9arrows-read-only /var/www/9arrows# cd /var/www/9arrows
# chmod 777 log public/attach public/javascripts/comp tmp tmp/{cache,pids,sessions,sockets}# vi /etc/httpd/conf.d/9arrows.conf Railsのチュートリアルを参考に以下のような設定をしました。<VirtualHost *:80>
ServerName 10.211.55.3
DocumentRoot /var/www/9arrows/public/
ErrorLog /var/www/9arrows/log/9arrows_error.log
CustomLog /var/www/9arrows/log/9arrows_access.log combined
<Directory /var/www/9arrows/public/>
Options ExecCGI FollowSymLinks
AddHandler cgi-script .cgi
AllowOverride all
Order allow,deny
Allow from all
</Directory>
</VirtualHost>終わったらhttpdを再起動します。# service httpd restart# chmod +x public/dispatch.cgi
# ln -s /usr/bin/ruby /usr/local/bin/ruby# vi config/environment.rb
RAILS_GEM_VERSION = '2.1.1' unless defined? RAILS_GEM_VERSION# su - postgres
$ createuser 9arrows -P
$ createdb 9arrows_test -O 9arrows
$ createdb 9arrows_production -O 9arrows
$ createdb 9arrows_development -O 9arrows次にconfig/database.ymlを編集してデータベース名・ユーザ名・パスワードを設定する。# vi config/database.yml
---–
development:
adapter: postgresql
database: 9arrows_development
username: 9arrows
password: 9arrows
host: localhost
---–設定ができたら、rakeコマンドでデータベースの初期化を行います。# rake db:migrate
rake db:fixtures:loadブラウザからアクセス
ここまでできたら、ブラウザからアクセスしてみます。
| ID | 9arrows@example.com |
|---|---|
| PW | 9arrows |
ログイン画面が出れば完了です。
今回はParallelsで構築したのでパフォーマンス的にはちょっと難しい感じですが、ちゃんとしたサーバで構築すれば問題ないと思います。あと、とりあえずメールについてはスルーしましたけど、きちんと設定すれば期限が来たらメール送信等もできるみたいですし、他にもAdobe AIRを使用すると、サーバにアクセスできなくてもクライアントだけで編集等もできるようなので、結構使い勝手はよさそうですね。
Rails全く知らなくてもなんとかなるもんですね。なんとなく雰囲気はわかった気がしました。
昨日は祝日で外に遊びにいってたのですが、一応ノルマは守りました。ということで月曜日の『Perl』の勉強成果をアップ。引き続き、sedをPerlで置き換えてみます。
From: %%FROM%%<%%ADDR%%>
To: %%TO%%
Subject: [%%LEVEL%%] %%SUBJECT%%
%%CONTENTS%%
------------------------------
This mail is automatically sent.これを置き換えるスクリプトをmake_mail.plとする。内容は以下#!/usr/bin/perl -s -wpl
s/ %%FROM%% /$from/xg;
s/ %%ADDR%% /$addr/xg;
s/ %%TO%% /$to/xg;
s/ %%LEVEL%% /$level/xg;
s/ %%SUBJECT%% /$subject/xg;
s/ %%CONTENTS%% /$contents/xg;で実行するコマンドは以下。$ ./make_mail.pl -from='kunkichi' -addr='kunkichi@example.com' -to='admin@example.com' -level='CRITICAL' -subject='SERVER DOWN!!!' -contents='Server is down at 10:25. Please Check!!!' mail.tpl出力結果：From: kunkichi <kunkichi@example.com>
To: admin@example.com
Subject: [CRITICAL] SERVER DOWN!!!
Server is down at 10:25. Please Check!!!
------------------------------
This mail is automatically sent.-sで引数を変数として取る。正規表現でxを使って正規表現中にスペースを含めるので、読みやすい。ただし、変換前文字だけ。$ perl -i.BAK -wpl -e 's/aaa/bbb/g;' sample.txtオリジナルファイルは、sample.txt.BAKとしてリネームされて、sample.txtに変換後の結果が上書きされる#!/usr/bin/perl -s -i.BAK -wpl
s/$re/$after/g;-sでオプションを取ってオリジナルファイルを変換、元ファイルは.BAKをつけてリネーム。s/
^ # 行頭が
aaa # aaaで始まり
.* # 任意の文字が０回以上続いて
bbb # bbbで
$ # 行末が終わる
/changed/gx; # ところを"changed"に置き換える。$ perl -i.$SECONDS -wpl -e 's/aaa/bbb/g;' sample.txt#!/usr/bin/perl -i -wpl
BEGIN{ $^I=$$; }
s/aaa/bbb/g;ただしこれはコマンドラインからの実行では、$$はシェルで展開されてシェルのPIDが入ってくるので、同じシェルで2回実行すると全く意味が無くなる。あくまでもスクリプト内で使う。sedのところは残り少しです。
ここ2、3日の間、ポインタと格闘していました。ポインタ単体の意味は理解できるのだけど、配列とごっちゃになった瞬間もうわかりません、、、他の言語と比べると、C言語ではどうも配列とポインタの区別が曖昧な印象があるんだよね。
これはちょっとまずいってんで、その部分だけもう少ししっかり勉強しようと言うことで、教科書増やしました。
両方ともヤフオクでゲットしたので比較的懐を痛めずに済みました（笑）
ここまでの印象では他言語と特に大きく変わるところもなかったし、特につまずいたところもなかったのですが、ここはC言語の一番の山場っぽいので苦戦しそうです。もう少し格闘してみたいと思います。
今日も外で勉強してきました。やっぱり外はいいですね。ということで木曜日は『Perl』です。今回からsedをPerlで置き換えてみようというところです。
$ echo "abcde" | perl -wpl -e 's/abc/ABC/g;'
ABCde$ cat example.sed
s/a/A/g
s/b/B/g
s/c/C/g$ echo "abcde" | sed -f example.sed
ABCdeこれをPerlで。コマンドラインだとこんな感じ。$ echo "abcde" | perl -wpl -e '
> s/a/A/g;
> s/b/B/g;
> s/c/C/g;'
ABCdeスクリプトだと以下。$ cat example.pl
#!/usr/bin/perl -wpl
s/a/A/g;
s/b/B/g;
s/c/C/g;$ echo "abcde" | ./example.pl
ABCde$ cat sample.txt
This is sentence 1.
This is sentence 2.
This is sentence 3.$ sed '1s/sentence/REVISED_SENTENCE/g;' sample.txt
This is REVISED_SENTENCE 1.
This is sentence 2.
This is sentence 3.Perlだと行番号を表す$.を使う。$ perl -wpl -e '$. == 1 and s/sentence/REVISED_SENTENCE/g;' sample.txt
This is REVISED_SENTENCE 1.
This is sentence 2.
This is sentence 3.$ cat sample2.txt
This is paragraph 1.
And, this is a sentence for paragraph 1.
This is paragraph 2.
And, this is a sentence for paragraph 2.
This is paragraph 3.
And, this is a sentence for paragraph 3.$ perl -00 -wpl -e '$. == 1 and s/paragraph/PARAGRAPH/g;' sample2.txt
This is PARAGRAPH 1.
And, this is a sentence for PARAGRAPH 1.
This is paragraph 2.
And, this is a sentence for paragraph 2.
This is paragraph 3.
And, this is a sentence for paragraph 3.
$ echo "This is a sample sentence." | sed 's/^\(.*\) \(sentence\.\)$/\1 REVISED \2/g'
This is a sample REVISED sentence.sedはカッコにエスケープをつけると正規表現の部分マッチ用のカッコとなる。次にPerl。$ echo "This is a sample sentence." | perl -wpl -e 's/^(.*) (sentence\.)$/$1 REVISED $2/g'
This is a sample REVISED sentence.Perlの場合は逆にエスケープをつけない場合が正規表現のマッチ用カッコとなる。$ sed -n '2,$p' sample.txt
This is sentence 2.
This is sentence 3.Perlだとこんな感じ。$ perl -wnl -e '$. > 1 and print;' sample.txt
This is sentence 2.
This is sentence 3.sedで後方参照する時っていつもカッコのエスケープ忘れてハマるんだよね、苦笑。行番号の箇所なんかもキー入力はPerlのほうが少し多くなるけど、直感的。
2010/07/29/ 17:56
2010/07/10/ 01:48
2009/10/21/ 14:08
2009/10/04/ 12:39
2009/09/23/ 13:31