2017-10-09

業務系システムの保守/運用で仙人が誕生する理由

この業界に戻ってそろそろ一年が経過しようとしている。

どこの現場もかわらないなという印象を受けている。

その中でどこの現場にもいるであろう「仙人」が生成される仕組みをメモしておく。

原因的なところ

難しいことをこなすIT技術的な能力が乏しい。
知識を体系化する能力がない。
納期が厳しい。
クライアントが IT をカカオと同じ程度にしか考えていない。

誕生する仕組み

資料/仕組みを作る時間がない。
- 業務が忙しい。
- カウボーイ気質。
知識/経験重視になる。
資料を作っても陳腐化する。
- 歯を食い縛って耐えている人、外から呼ばれた人が一念発起で作成したりする。
- 作成された資料を誰もメンテしないし、使われない。「知識/経験重視」なので
- いろんな人がそれぞれの思いで作成し多様化する。
生きのこる人と、涅槃に入られるお方に分かれる。
生きのこった人はその道を極めることになる。
そして仙人が誕生する。
仙人を頂点とした世界のヒエラルキーは維持される。
仙人は仙人でいつづける。
そして世界は仙人中心にまわる。

仙人誕生後の世界

仙人は自身がどうやって仙人になったのか説明できない。
- なろうとしてなったのではなく、知識/経験を蓄積したけだから。
人に教育出来ない。
- 「知識/経験を蓄積したけ」なのでそれは時間で解決するしかない。
- そもそもそれを理解できていない。
- 理解する能力がない/欠如している/成長過程において育成されていない。
「出来ない」を個人の精神論でしか語れない。
「説法」中心になる。
- 説明出来る自分に酔いしれるようになる。
- そこでの他者の存在が薄れていく。
- 理解できない他社が「馬鹿」に見え初める。

仙人のメリット

案外コストが安い。のではないか。
- 教育/仕組み化のコストを削減出来る。
- どのみに大した事していないし。
- 人一人を飼いならしておけば良いので。
クライアントからの窓口が一本化される。
終身雇用制にぴったり。なので日本らしい。

仙人のデメリット

仙人の能力以上の組織にはならない。
仙人は多忙なので自身の能力開発がされない。
世代交代が難しい。

おわり

仙人になる人は頭のキレる賢い人が多いとおもう。なので誰でも仙人になれるわけではないと思います。

ただ、そういう人はいろんな物を自分に寄せ、短いスパンでの利益を追い求める傾向が強いように感じます。(自身の評価を高めるのに効率が良い方法だと思います)

このサイクルは業務系システムの保守/運用の現場だけではなく、そこら中に溢れていると思う。これは逃れられない事かもしれない。

けれどITはこれらを解決するための物ではないか。と強く思う。

2017-09-02

Windows で trival-ssh が出来ない件

Windows Common Lisp

(ql:quickload :trivial-ssh) すると [package libssh2]. で停止する。

表示されるコマンドを msys2 のターミナルで叩くと成功する模様

yanqi@ MINGW64 ~/.emacs.d/dist/emacs                                                                                                                              
$ gcc -o "C:\Users\yanqi\AppData\Local\common-lisp\sbcl-1.3.15-win-x64\C\Users\yanqi\prj\trivial-ssh\libssh2\libssh2-libc-cffi__grovel-tmpGHU3ALSV.obj" -c -m64 -IC:/Users/y 
anqi/prj/cffi/ "C:\Users\yanqi\AppData\Local\common-lisp\sbcl-1.3.15-win-x64\C\Users\yanqi\prj\trivial-ssh\libssh2\libssh2-libc-cffi__grovel.c"                              
                                                                                                                                                                             
yanqi@ MINGW64 ~/.emacs.d/dist/emacs                                                                                                                              
$ echo $?                                                                                                                                                                    
0                                                                                                                                                                            

yanqi@ MINGW64 ~/.emacs.d/dist/emacs
$ ls -la /c/Users/yanqi/AppData/Local/common-lisp/sbcl-1.3.15-win-x64/C/Users/yanqi/prj/trivial-ssh/libssh2/libssh2-libc-cffi__grovel-tmpGHU3ALSV.obj
-rw-r--r-- 1 PC568+yanqi PC568+yanqi 5537 9月   2 14:52 /c/Users/yanqi/AppData/Local/common-lisp/sbcl-1.3.15-win-x64/C/Users/yanqi/prj/trivial-ssh/libssh2/libssh2-libc-cffi_ _grovel-tmpGHU3ALSV.obj

コードを眺めてみる。

trivial-ssh-libssh2.asd の (cffi-grovel:grovel-file "libssh2-libc-cffi") で libssh2 をコンパイルしているがここで止っている様子

cffi-grovel:grovel-file

cffi-grovel:grovel-file はクラスでした。

(defclass grovel-file (process-op-input cc-flags-mixin)
  ()
  (:default-initargs
   :generated-lisp-file-type "processed-grovel-file")
  (:documentation
   "This ASDF component represents an input file that is processed
    by PROCESS-GROVEL-FILE."))

grovel.lisp

grovel.lisp の process-grovel-file で帰ってこない模様。

(cc-compile o-file inputs)

;;; *PACKAGE* is rebound so that the IN-PACKAGE form can set it during
;;; *the extent of a given grovel file.
(defun process-grovel-file (input-file &optional (output-defaults input-file))
  (with-standard-io-syntax
    (let* ((c-file (generate-c-file input-file output-defaults))
           (o-file (make-o-file-name c-file))
           (exe-file (make-exe-file-name c-file))
           (lisp-file (tmp-lisp-file-name c-file))
           (inputs (list (cc-include-grovel-argument) c-file)))
      (handler-case
          (progn
            ;; at least MKCL wants to separate compile and link
            (cc-compile o-file inputs)
            (link-executable exe-file (list o-file)))
        (error (e)
          (grovel-error "~a" e)))
      (invoke exe-file lisp-file)
      lisp-file)))

cc-compile

cc-compile はコンパイルしているだけ。

(defun cc-compile (output-file inputs)
  (apply 'invoke-builder (list *cc* "-o") output-file
         "-c" (append *cc-flags* #-windows '("-fPIC") inputs)))

invoke-builder

(defun invoke-builder (builder output-file &rest args)
  "Invoke the C Compiler with given OUTPUT-FILE and arguments ARGS"
  (with-temporary-output (output-file)
    (apply 'invoke `(,@builder ,output-file ,@args))))

invoke

ここの以下の場所で帰ってこない。

(run-program cmd :output :interactive :error-output :interactive)

(defun invoke (command &rest args)
  (when (pathnamep command)
    (setf command (native-namestring command))
    #+os-unix
    (unless (absolute-pathname-p command)
      (setf command (strcat "./" command))))
  (let ((cmd (cons command (mapcar 'program-argument args))))
    (safe-format! *debug-io* "; ~A~%" (escape-command cmd))
    (dolist (d cmd)
      (print d))
    (run-program cmd :output :interactive :error-output :interactive)))

run-program

UIOP/RUN-PROGRAM:RUN-PROGRAM な様子。

UIOP か。。。

UIOP 見るかぁ

で、時間がないので今度にしよう。

2017-01-29

Windows10 でインストールするもの 2017

Windows

仕事で Windows を利用することになった。家でも Windows を常用することにした。

何インストールしたか別らんくなるので、自身の環境を書いておく。

環境

Emacs
- これが無いと私はIT技術者として成り立ちません。
CorvusSKK
- 日本後入力はこれがないとなりたちません。
Msys2
- Cygwin よりこれを利用しろと知人に言われたので。
SplashID Safe
- パスワード地獄は現世のことですよね。
Launchy
- これがシンプルで一番使いやすいです。
Poderosa
- ひさしぶりに見たらバージョンアップしていました。
- 職場では(個人で)有料ライセンスを購入して利用しています。

プログラミング

言語

Lang	software
Common Lisp	roswell
Python	miniconda
Javascript	nodist

バージョン管理

Git
- これは Msys2 でインストールしています。
Github Desktop
- コマンドでやれって言われるかもしれませんが楽なので。

ブラウザ

プライベートでは Vivaldi をメインに利用しています。仕事では Google Chrome を利用しています。

データベース

今までは MySQL を利用していましたが PostgreSQL を利用することにしました。仕事が PostgreSQL なので。

ストレージ

なんか多いですね。

画像

娯楽

おわり

Chef でも使えば良いのかな。と思いつつもそんなに再インストールするかな。

まぁいいや。まぁいいか？

ほんとのこと知りたいだけなのに。

夏休みはもうおわり。