test

Sun Studio 12: Fortran ライブラリ・リファレンス

1.4.52 ttynam、isatty: 端末ポートの名前の読み取り

ttynam と isatty は、端末ポート名に関する処理を行います。

1.4.52.1 ttynam: 端末ポートの名前の読み取り

関数 ttynam は論理装置 lunit に結合されている端末デバイスのパス名を空白で埋めて返します。

関数は、次のように呼び出します。

CHARACTER ttynam*24

name = ttynam( lunit )

lunit

INTEGER*4

入力 

論理装置 

戻り値 

character*n

出力 

空白でない場合: name は lunit 上のデバイスのパス名。サイズ n は、もっとも長いパス名が入るのに十分な大きさにする

空の文字列 (すべて空白): lunit はディレクトリ /dev の中の端末デバイスと結合されていない

1.4.52.2 isatty: 装置が端末であるかどうかの確認

関数 isatty は、論理装置 lunit が端末装置かどうかによって、true または false を返します。

関数は、次のように呼び出します。

terminal = isatty( lunit )

lunit

INTEGER*4

入力 

論理装置 

戻り値 

LOGICAL*4

出力 

terminal = 真: 端末デバイスである

terminal = 偽: 端末デバイスではない

例: lunit が tty であるかどうかを確認します。


       character*12 name, ttynam
       INTEGER*4 lunit /5/
       logical*4 isatty, terminal
       terminal = isatty( lunit )
       name = ttynam( lunit )
       write(*,*) '端末 = ', terminal, ', 名前 = "', name, '"'
       end

出力は次のように表示されます。


 端末 = T, 名前 = "/dev/ttyp1  "