sndio in FreeBSD

作者さんの手による模範的な音の鳴らし方。

/*
 * defaults parameters
 */
sio_initpar(&par);
par.sig = 1;
par.bits = 16;
par.pchan = 2;
par.rate = 48000;

これが現実的な設定だよな。前回の24Bitって、安物PCの音装置ではありえな い設定だろう。

while ((ch = getopt(argc, argv, "r:c:e:b:x:")) != -1) {
        switch(ch) {
        case 'r':
                if (sscanf(optarg, "%u", &par.rate) != 1) {
                        fprintf(stderr, "%s: bad rate\n", optarg);
                        exit(1);
                }
                break;

sscanfの上手な利用方法。

bufsz = par.bps * par.pchan * par.round;
buf = malloc(bufsz);

適切なバッファーサイズの決め方。

for (;;) {
        len = read(STDIN_FILENO, buf, bufsz);
	:
        if (len == 0) {
                fprintf(stderr, "eof\n");
                break;
        }
        n = sio_write(hdl, buf, len);
        if (n == 0) {
                fprintf(stderr, "sio_write: failed\n");
                exit(1);
        }
	:
}
sio_close(hdl);

メインループ。読み込みバイト数がゼロなら、それはeofに逹っした証拠ですっ て、きちんと明言してるな。前回のオイラーみたいにwhile(read){..} みたい に、判定をwhile任せにしていない。

大音量なので、ヴォリュームを絞っておく。

sakae@slfb:~/snd $ mixer vol=0.3:0.3
vol.volume: 0.50:0.50 -> 0.30:0.30
pcm0:mixer: <Realtek ALC269 (Analog 2.0+HP/2.0)> on hdaa0 (play/rec) (default)
    vol       = 0.30:0.30     pbk
    pcm       = 0.98:0.98     pbk
    speaker   = 0.59:0.59     rec
    rec       = 0.37:0.37     pbk
    igain     = 0.00:0.00     pbk
    ogain     = 1.00:1.00     pbk
    monitor   = 0.80:0.80     rec src

こうしておいて、リソースが一時的に読めないか、trussを使って確認。まずは、標準のやつ。 case aucat

read(4,"\0\0\0\a\M^?\M^?\M^?\M^?\0\0\^A"...,40)  = 40 (0x28)
read(4,"\0\0\0\^F\M^?\M^?\M^?\M^?\0\0\^A"...,40) = 40 (0x28)
read(4,0x20a31090,40)                            ERR#35 'Resource temporarily unavailable'
poll({ 4/POLLIN|POLLOUT },1,-1)                  = 1 (0x1)
write(4,"\0\0\0\^E\M^?\M^?\M^?\M^?\0\0\b"...,40) = 40 (0x28)
write(4,"\M-%&c\0\0\0\0\0\M^S\M-Eg\0\0\0"...,2048) = 2048 (0x800)
poll({ 4/POLLIN },1,-1)                          = 1 (0x1)
read(4,"\0\0\0\a\M^?\M^?\M^?\M^?\0\0\^A"...,40)  = 40 (0x28)
read(4,"\0\0\0\^F\M^?\M^?\M^?\M^?\0\0\^A"...,40) = 40 (0x28)
read(4,0x20a31090,40)                            ERR#35 'Resource temporarily unavailable'
poll({ 4/POLLIN|POLLOUT },1,-1)                  = 1 (0x1)
write(4,"\0\0\0\^E\M^?\M^?\M^?\M^?\0\0\b"...,40) = 40 (0x28)
write(4,"\^_\^D\M-L\M^?\0\0\0\0\M-#$\M-E"...,2048) = 2048 (0x800)
poll({ 4/POLLIN },1,-1)                          = 1 (0x1)

次はオイラーが前回作成した恐怖のサンプル。case myapp

read(3,"\0\0\0\a\M^?\M^?\M^?\M^?\0\0\0"...,40)   = 40 (0x28)
read(3,0x20a08090,40)                            ERR#35 'Resource temporarily unavailable'
poll({ 3/POLLIN },1,-1)                          = 1 (0x1)
read(3,"\0\0\0\a\M^?\M^?\M^?\M^?\0\0\0@"...,40)  = 40 (0x28)
read(3,"\0\0\0\^F\M^?\M^?\M^?\M^?\0\0\^A"...,40) = 40 (0x28)
read(3,0x20a08090,40)                            ERR#35 'Resource temporarily unavailable'
poll({ 3/POLLIN|POLLOUT },1,-1)                  = 1 (0x1)
write(3,"\0\0\0\^E\M^?\M^?\M^?\M^?\0\0\b"...,40) = 40 (0x28)
write(3,"\0\M^N\M-H\M-$\0\0\0\0\0bE\240\0"...,2048) = 2048 (0x800)

OSが代わっても、発生するな。安心したぞ。

河童版の作者さんにも問い合わせ。河童版 7.4 では、どうでしょうか？ そうか、タイムマシンで古いOSを使ってみたらというアドバイスだな。 結果は、やはりエラーが発現した。エンバグの可能性は、これで消滅した。

ふと、sndioとの組み合わせで、まずい事が起きていると想像。ならば、音装 置に書き出すのを止めて、普通のファイルへ出力しよう。

oo = open("dmy", O_WRONLY | O_CREAT | O_TRUNC, 0666);

while(read(fd, buf, SZ)) {
  //sio_write(my, buf, SZ);
  write(oo, buf,SZ);
}

もはや、ファイルのコピー・アプリだな。勿論、結果は問題なし。そして、あ たり前だけど、瞬時に終了する。ここまできたら、アドバイザー頼リだな。

Q: ブロックモードでオープンしてるので、こういうエラーは 発生しないと思っていたのですが、いかがでしょうか？

A: `errno 35` (Resource temporarily unavailable) は、通常 `EAGAIN` や `EWOULDBLOCK` として知られ、非ブロッキング I/O の操作で発生します。このエラーは、リソースが一時的に利用できないため、操作が完了できなかったことを意味しますが、OpenBSD の場合でもこのエラーは一般的です。

`fd = open(sndf, O_RDONLY);` はデフォルトでブロッキングモードで開かれますが、`read` システムコールが `errno 35` を返すことがあるのは、音声デバイスの遅延や、オーディオバッファが一時的にデータを受け入れられない状態にある可能性が考えられます。

対策としては、以下のいくつかの方法を試すことができます:

1. エラー処理を追加: `read` や ` sio_write ` の戻り値が `-1` で、`errno` が `EAGAIN` または `EWOULDBLOCK` の場合は、リトライするか、`select` や `poll` で再度操作が可能になるのを待つロジックを追加することができます。

   while (1) {
       ssize_t n = read(fd, buf, SZ);
       if (n == -1) {
           if (errno == EAGAIN || errno == EWOULDBLOCK) {
               // リトライのために待つ処理を追加 (例: sleep, select)
               continue;
           } else {
               // 他のエラー処理
               perror("read error");
               break;
           }
       }
       if (n == 0) {
           // EOF に達した場合
           break;
       }
       sio_write(my, buf, n);
   }
   

2. ファイルディスクリプタが非ブロッキングモードになっていないか確認: `fcntl` でファイルディスクリプタが非ブロッキングモードに設定されているかどうかを確認し、必要に応じてブロッキングモードに戻すことも可能です。

   int flags = fcntl(fd, F_GETFL, 0);
   if (flags & O_NONBLOCK) {
       fcntl(fd, F_SETFL, flags & ~O_NONBLOCK); // ブロッキングモードに設定
   }
   

3. バッファサイズの調整: `SZ` の値が適切でない場合、オーディオバッファが一時的に書き込みを拒否することがあります。バッファサイズを調整するか、書き込むデータのサイズを小さくすることも考慮してみてください。

これらの方法で、音声データの読み込みと書き込みが安定するか試してみてく ださい。

制御卓の全てを確認するには、特権が必要らしい。

ob$ doas mixerctl -av
inputs.dac-0:1=126,126
inputs.dac-2:3=126,126
record.adc-0:1_mute=off  [ off on ]
 :
outputs.master=126,126
outputs.master.mute=off  [ off on ]
outputs.master.slaves=dac-0:1,dac-2:3,spkr,hp  { dac-0:1 dac-2:3 spkr hp mic2 }

ユーザー・レベルでは、簡単操作のみが許される？

ob$ sndioctl
input.level=0.490
input.mute=0
output.level=0.494
output.mute=0
server.device=0
app/aout0.level=1.000
app/qemusys0.level=1.000
app/qemusys1.level=1.000
ob$ sndioctl output.mute=1

play.cをコンパイルするには、tools.[ch]も必要。

ob$ cc -c tools.c -I.
ob$ cc -g tools.o play.c -I. -lsndio

これで実行できる。

ob$ cat z.raw | ./a.out
1920 bytes buffer, max latency 17280 frames
playpos = 0, writepos = 69120, latency = 69120
playpos = 1920, writepos = 71040, latency = 69120
playpos = 3840, writepos = 72960, latency = 69120
 :
playpos = 1080960, writepos = 1150080, latency = 69120
playpos = 1082880, writepos = 1152000, latency = 69120
eof