CVSROOT: /sources/m4 Module name: m4 Changes by: Eric Blake <ericb> 06/10/21 22:15:52
Index: tests/builtins.at =================================================================== RCS file: /sources/m4/m4/tests/builtins.at,v retrieving revision 1.25 retrieving revision 1.26 diff -u -b -r1.25 -r1.26 --- tests/builtins.at 19 Oct 2006 23:13:45 -0000 1.25 +++ tests/builtins.at 21 Oct 2006 22:15:52 -0000 1.26 @@ -495,6 +495,32 @@ AT_CLEANUP +## ------- ## +## mkdtemp ## +## ------- ## + +AT_SETUP([mkdtemp]) + +dnl Check that on error, the expansion is void +AT_DATA([[in]], +[[mkdtemp(`no_such_dir/m4-fooXXXXXX') +]]) +AT_CHECK_M4([in], [1], [[ +]], [[m4:in:1: mkdtemp: cannot create directory `no_such_dir/m4-fooXXXXXX': No such file or directory +]]) + +dnl Check that umask has an effect +AT_DATA([[in]], +[[substr(esyscmd(`ls -ld 'mkdtemp(`m4-fooXXXXXX')), `0', `10') +]]) +AT_CHECK([m4 < in], [0], [[drwx------ +]]) +AT_CHECK([umask 700; m4 < in], [0], [[d--------- +]]) + +AT_CLEANUP + + ## -------- ## ## maketemp ## ## -------- ## @@ -506,7 +532,16 @@ [[mkstemp(`no_such_dir/m4-fooXXXXXX') ]]) AT_CHECK_M4([in], [1], [[ -]], [[m4:in:1: mkstemp: cannot create tempfile `no_such_dir/m4-fooXXXXXX': No such file or directory +]], [[m4:in:1: mkstemp: cannot create file `no_such_dir/m4-fooXXXXXX': No such file or directory +]]) + +dnl Check that umask has an effect +AT_DATA([[in]], +[[substr(esyscmd(`ls -ld 'mkstemp(`m4-fooXXXXXX')), `0', `10') +]]) +AT_CHECK([m4 < in], [0], [[-rw------- +]]) +AT_CHECK([umask 700; m4 < in], [0], [[---------- ]]) dnl Check for Solaris compatibility of maketemp. Hopefully the pid is
