ttyZ0:makoto@hostname 8:34:46/060430(/export)> \
? sudo grep Invalid /var/log/authlog | awk '{print $10}' | sort | uniq -c
   3 200.67.149.81
   3 210.53.138.21
1032 211.125.76.65
  12 217.158.94.4
   2 218.22.26.98
   6 219.232.52.92
1332 220.232.130.80
  11 61.28.1.129
  20 86.101.30.12
ttyZ0:makoto@hostname  8:34:49/060430(/export)> 

   17  cvs -d :pserver:anoncvs@cvs.sv.gnu.org:/sources/emacs co emacs

   19  mkdir emacs-work
   20  cd emacs-work/
   21  ../emacs/configure
   22  time make bootstrap
...
Directory /home/makoto/emacs/lisp/./toolbar
Directory /home/makoto/emacs/lisp/./url
Generating /home/makoto/emacs/lisp/cus-load.el...
Loading vc-cvs...
Saving file /home/makoto/emacs/lisp/cus-load.el...
Wrote /home/makoto/emacs/lisp/cus-load.el
Generating /home/makoto/emacs/lisp/cus-load.el...done
make[2]: Leaving directory `/home/makoto/emacs-work/lisp'
make[1]: Leaving directory `/home/makoto/emacs-work'

real    70m32.078s
user    11m42.671s
sys     3m52.668s
bash-3.00$

cd 
emacs-work/src/emacs

＠ tc-2.3.1:

ac-wrapper: /usr/bin/autom4te-2.13 is missing or not executable.
            Something is very wrong.
aclocal: autom4te failed with exit status: 1
make: *** [aclocal.m4] Error 1

ttyq7:makoto@st4200 12:56:23/060430(/export/pkgsrc)> grep autom4te  devel/*/PLIST
devel/autoconf/PLIST:bin/autom4te
devel/autoconf/PLIST:man/man1/autom4te.1
devel/autoconf/PLIST:share/autoconf/autom4te.cfg

[makoto@dell ~/local-src/tc-2.3.1]$ autom4te --version
ac-wrapper: /usr/bin/autom4te-2.13 is missing or not executable.
            Something is very wrong.

  137  autoconf-2.5x
  138  ./configure
  139  make
  140  /usr/sbin/alternatives --set automake /usr/bin/automake-1.9
  141  make

#!/usr/pkg/bin/perl
while (<>) {
    s/ //g;
    chomp;
    $stat{$_}++; }
    foreach my $i (sort keys %stat) {
        printf("%-18s: %4d\n", $i, $stat{$i}); }

ttyp2:makoto@hostname  8:30:45/060429(~)> \
sudo grep Invalid /var/log/authlog | awk '{print $10}' | perl perl/practice/stat-sort-u
Password:
200.67.149.81     :    3
217.158.94.4      :   12
218.22.26.98      :    2
220.232.130.80    : 1332
86.101.30.12      :   20

• (操作行では) 例えば何か必要な変更をしていて、その後に(不用意に) cvs update をすると、 変更したものは名前を変えて保存していてくれる

  ttypa:makoto@st4200 9:18:48/060428(~/cvs-work/jeedosaquin)> vi auto-index.cgi
  ttypa:makoto@st4200 9:18:56/060428(~/cvs-work/jeedosaquin)> cvs update auto-index.cgi
  (Locally modified auto-index.cgi moved to .#auto-index.cgi.1.62)
  U auto-index.cgi
  ttypa:makoto@st4200 9:19:04/060428(~/cvs-work/jeedosaquin)> 
  

• しかし pcl-cvs で U をすると、そうならずに、問答無用に その変更分を消して古いもので上書きしてくれる

あるいは pcl-cvs の設定で、上書き禁止の指定が出来るのかな ?

(defun-cvs-mode (cvs-mode-undo . SIMPLE) (flags)
  "Undo local changes to all marked files.
The file is removed and `cvs update FILE' is run."
  ;;"With prefix argument, prompt for cvs FLAGS."
  (interactive (list nil));; (cvs-flags-query 'cvs-undo-flags "undo flags")
  (if current-prefix-arg (call-interactively 'cvs-mode-revert-to-rev)
    (let* ((fis (cvs-do-removal 'undo "update" 'all))
	   (removedp (lambda (fi)
		       (or (eq (cvs-fileinfo->type fi) 'REMOVED)
			   (and (eq (cvs-fileinfo->type fi) 'CONFLICT)
				(eq (cvs-fileinfo->subtype fi) 'REMOVED)))))
	   (fis-split (cvs-partition removedp fis))
	   (fis-removed (car fis-split))
	   (fis-other (cdr fis-split)))
      (if (null fis-other)
	  (when fis-removed (cvs-mode-run "add" nil fis-removed))
	(cvs-mode-run "update" flags fis-other
		      :postproc
		      (when fis-removed
			`((with-current-buffer ,(current-buffer)
			    (cvs-mode-run "add" nil ',fis-removed)))))))))

＠ ~/.cvsrc:

update -dP -C

＠ 切替人生:

ttyp3:makoto@hostname 4:29:30/380409(~)> date
Sat Apr  9 04:29:31 JST 1938

Apr  9 04:29:01 h named[26363]: ../entropy.c:374: fatal error:
Apr  9 04:29:01 h named[26363]: RUNTIME_CHECK(isc_time_now((&t)) == 0) failed
Apr  9 04:29:01 h named[26363]: exiting (due to fatal error in library)

118  7:39    cd /export/pkgsrc
119  7:39    cvs -d:pserver:anonymous@cvs.sourceforge.net:/cvsroot/pkgsrc-wip login
120  7:40    cvs -d:pserver:anonymous@cvs.sourceforge.net:/cvsroot/pkgsrc-wip co -P wip
123  7:42    ls -lagd wip/e*
127  7:46    cvs -d:pserver:anonymous@cvs.sourceforge.jp:/cvsroot/pkgsrc-wip co -P wip-jp

ttyp8:makoto@st4200 7:52:04/060424(/export/pkgsrc)> find . -type d -name \*emacs\* 
./wip/emacs-jabber
./wip/sxemacs
./wip-jp/emacs-w3m
./wip-jp/emacs-wget
./devel/emacs-ilisp
./devel/emacs20-elib
./editors/emacs
./editors/emacs-nox11
./editors/emacs-packages
./editors/emacs20
./editors/uemacs
./editors/xemacs
./editors/xemacs-current
./editors/xemacs-nox11
./editors/xemacs-packages
./textproc/emacs-dict-client
./textproc/ispell-emacs
./www/emacs-w3m
./personal-pkgsrc/emacs

＠ anoncvs の方にまだ mirror されていない:

push(@hoge,[ 'mary', 'milano', 1]);

struct bar {
    char *name;
    char *qth;
    int  id;
};
typedef bar barstruct;

struct bar  barray[];

上の Perl の例の @hoge の他に @foo も作って、 別のある関数から、@hoge や @foo の中の配列要素を取り出して操作すること。

struct bar {
    char *name;
    char *milano;
    int  id;
};

struct bar  A[] = 
{
  {"Mary", "Minano",1},
  {0,0,0},
};

struct bar  B[] = 
{
  {"Tom", "Austin",1},
  {0,0,0},
};
printname(struct bar *ptr){
  printf("Name: %s\n", ptr[0].name);

}

main (){
  printf("Starting...\n");
  printname(A);
  printname(B);
}

ttyp5:makoto@st4200 8:28:01/060424(~/c)> cc array-pointer.c
ttyp5:makoto@st4200 8:31:32/060424(~/c)> ./a.out
Starting...
Name: Mary
Name: Tom
ttyp5:makoto@st4200 8:31:33/060424(~/c)> 

C-x RET c emacs-mule RET
(日記を開ける)
で正しく読めるので、
M-x set-buffer-file-coding-system RET euc-japan RET

C-x RET c euc-japan RET
C-x C-s

ttyp8:makoto@st4200 7:38:02/060420(~)> bc
obase = 2
 62.106
  111110.0001101100
186.2
10111010.0011
248.306
11111000.0100111001
248.30599999999998 
11111000.01001110010101100000010000011000100100110110111

     111110.0001101100
+  10111010.0011
   -------------------
   11111000.01001110010101100000010000011000100100110110111

ttyp8:makoto@st4200 7:55:42/060420(~)> bc
ibase = 2
11111000.01001110010101100000010000011000100100110110111
248.30599999999997606892065959982573986053466796875
11111000.0100111001
248.3056640625

ruby -e 'print readlines.reverse' < input_file

(+ 62.106 186.2)
248.30599999999998

(+ 62.106 186.1)
248.206

(+ 62.106 186.0)
248.106

(+ 62.206 186.1)
248.30599999999998

(+ 248.0 0.306)
248.306

(+ 61.106 187.2)
248.30599999999998

(+ 248.106 0.2)
248.30599999999998

(+ 248.01 0.296)
248.30599999999998

(+ 248.1 0.206)
248.30599999999998

(+ 62.106 186.3)
248.406

(+ 148.1 0.206)
148.30599999999998
0.306 が特殊な数 ?

ttyp2:makoto@st4200 19:44:28/060419(~)> bc
ibase = 2
0.010011100101011000000100000110001001001101
.305999999999812644091434776782989501953125

(+ 0.1 0.206)
0.306

ttyp3:makoto@st4200 5:59:16/060420(~)> bc
obase = 2
0.306
.0100111001

======  1 missing files in DESTDIR  ========
Files in flist but missing from DESTDIR.
File wasn't installed ?
------------------------------------------
./usr/include/powerpc/byte_swap.h
========  end of 1 missing files  ==========

13:00 - 13:45 総会
14:00 - 18:30 BoF

Error: Couldn't create a font for 'RMPMIJ+WadaGo-Bold-H'

+displayNamedCIDFontTT RMPMIJ+WadaGo-Bold-H             /usr/pkg/lib/X11/fonts/TTF/kochi-gothic.ttf
+displayNamedCIDFontTT WadaGo-Bold-H            /usr/pkg/lib/X11/fonts/TTF/kochi-gothic.ttf

Error: Couldn't create a font for 'ZMHPSL+WadaGo-Bold-H'

メンバ関数には静的 (static) なものと、 class の中に普通に定義されているものがある。 後の方の、普通の場合には、定義には class::member_function という形が書いてある。 しかしこれは、定義で、実体ではないから、その同じ形では呼べない、 という意味だと理解した。 そこで解決するには、実体で配置してあるものを呼ぶ必要がある ということらしい。 つまり、自分で配置(instance)して、それを呼ぶようにするか、それとも もし既に用意してあるものがあれば、それを使って、例えば hoge -> member(); のように呼び出すとかする。

しかし (コンパイラのお知らせとして)もう少し親切に教えてくれても いい気がする。 「この形は静的なメンバ関数にのみ有効な呼出形式です。そうでない 通常のメンバ関数については実体で配置してある形で呼出して下さい」とでも。 これでも分らないか。 関係ないが親切な人もいる: C++、 第 25 章 マニピュレーター

mkdir ~/latex
tar zxf /e/u/j/distfiles/prosper-1.00.4.tar.gz
sudo cp -p prosper/*cls         /usr/pkg/share/texmf/tex/latex/misc/
sudo cp -p prosper/*sty         /usr/pkg/share/texmf/tex/latex/misc/
sudo cp -p prosper/contrib/*sty /usr/pkg/share/texmf/tex/latex/misc/
sudo mktexlsr
cd prosper/doc
platex prosper-tour.tex
vfxdvi prosper-tour.dvi
dvipdfmx prosper-tour.dvi
xpdf prosper-tour.pdf
pdvips -o prosper-tour.ps prosper-tour.dvi

vfxdvi.bin:  cannot get scaling factors.

prosper-tour.dvi -> prosper-tour.pdf
[1
Could not find any valid object.
Current input buffer is -->pdfmark end<--

   114  9:19    platex prosper-tour.tex
   115  9:19    pdvips -o prosper-tour.ps prosper-tour.dvi
   117  9:20    ps2pdf prosper-tour.ps
   118  9:20    xpdf prosper-tour.pdf

%%% Local Variables:
%%% mode: latex
%%% outline-regexp: "[ ]*\\\\\\(appendix\\|documentstyle\\|documentclass\\|part\\|chapter\\|section\\|subsection\\|subsubsection\\|paragraph\\|subparagraph \\|overlays \\)\\b\\|\\\\begin *{document}\\|\\\\end *{document}"
%%% TeX-master: t
%%% End:

• Emacs で Hacking ( Emacs を Hacking ではないよ)
  • gdb を使うとこんな画面になる
  • Elscreen-GF
• bulk build って楽しい (?)
  • Tsubai BSD を mini で bulk build すると
  • chroot の場合
  • Mac OS X の場合
  • (付帯質問: Mac OS X で X11 を使うか使わないか ?)
• TsubaiBSD って何 ?
  • 1998 年以来のつき合い
  • 毎月のお勤め

Landscape - エンジニアのメモ 2004-04-11

＠ 色変換:

• 全体像
• 具体的な何か

で実は何が言いたいかというと、説明書とか仕様書とか解説本とか Web page とかには、(まず最初に) その両方を備えておいて欲しい と思う。あるいは、そういうものの良さや、評価には、そのような 観点も必要だということ。

次の日、これを再び差しておいたが、少なくとも扇は回っていない。 もしかしたら必要な時にも回らないのかも知れないが、そのうち近くのお店で 見てもらおうと思う。

(add-hook 'find-file-hooks
	  (function 
	   (lambda ()
	     (setq mode-line-buffer-identification buffer-file-name)
  ....
)))

この mode-line-buffer-identification は通常は、次のような値になっているらしい

(#("%12b" 0 4
   (face Buffer-menu-buffer-face help-echo 
    "mouse-1: previous buffer, mouse-3: next buffer" 
     mouse-face mode-line-highlight local-map
	 (keymap
	  (header-line keymap
		       (mouse-3 . mode-line-bury-buffer)
		       (down-mouse-3 . ignore)
		       (mouse-1 . mode-line-unbury-buffer)
		       (down-mouse-1 . ignore))
	  (mode-line keymap
		     (mouse-3 . mode-line-bury-buffer)
		     (mouse-1 . mode-line-unbury-buffer))))))

ftp.tw.xemacs.org/pub/xemacs/Attic/releases/epoch/epoch/Epoch.FAQ:

 ;; List full filename, with path.
  (set-default 'mode-line-buffer-identification
             '(buffer-file-name ("%f") ("%b")))

(set-default 'mode-line-buffer-identification
             '(buffer-file-name ("%f")))

ちなみに、最初に使った buffer-file-name は変数。後から使った buffer-file-name は関数 (だと思う)。 (4/11/2006 追記)

(setq-default header-line-format
              '("%b : L%l C%c : %f")
)

(setq frame-title-format (concat "%b / " system-name ":%f"))
(setq icon-title-format "%b - %F")

Super Drive (CD-R/W DVD-R)

218.8.188.231     from allabout.co.jp ([218.8.188.231])
221.207.130.127   from allabout.co.jp ([221.207.130.127])
221.209.85.29     from allabout.co.jp ([221.209.85.29])
221.212.56        from allabout.ne.jp ([221.212.56.15])
221.212.59        from allabout.co.jp ([221.212.59.84])

dig mx allabout.co.jp 

whois 221.207.130.0/e

＠ All = Default -> All = Install:

＠ Emacs-21.4: