C/400

31. 名前を乱数発生させる一時ファイルを QTEMP に作成するには ?

ライブラリー QTEMP に作業用のファイルを作成したいが、重複しないような
名前で乱数のように発生するには、どのようにすればよいだろうか?
C/400では、これは意外と簡単で、tmpnam 関数を使って以下のソースのように
temp = tmpnam(NULL); と記述するだけでよい。

0001.00 #include <stdio.h>
0002.00 #include <stdlib.h> 
0003.00 #include <string.h> 
0004.00 
0005.00 #define TRUE         0 
0006.00 #define FALSE       -1 
0007.00 void main(void){ 
0008.00     char *temp; 
0009.00     char file[10]; 
0010.00 
0011.00    temp = tmpnam(NULL); 
0012.00    memset(file, 0, sizeof(file)); 
0013.00    strcpy(file, &temp[6]); 
0014.00    printf(" 一時ファイル %s を作成しました。 n", file); 
0015.00    getchar(); 
0016.00 }