Hex Artifact Content

Artifact 500a2d32b5d194534b148d5a1df134cc39570d66:


0000: 64 69 66 66 20 2d 75 4e 72 20 74 63 6c 38 2e 36  diff -uNr tcl8.6
0010: 2e 30 2e 6f 72 69 67 2f 75 6e 69 78 2f 74 63 6c  .0.orig/unix/tcl
0020: 55 6e 69 78 46 43 6d 64 2e 63 20 74 63 6c 38 2e  UnixFCmd.c tcl8.
0030: 36 2e 30 2d 62 75 67 33 36 31 33 35 36 37 2d 31  6.0-bug3613567-1
0040: 74 6d 70 64 69 72 66 69 78 2f 75 6e 69 78 2f 74  tmpdirfix/unix/t
0050: 63 6c 55 6e 69 78 46 43 6d 64 2e 63 0a 2d 2d 2d  clUnixFCmd.c.---
0060: 20 74 63 6c 38 2e 36 2e 30 2e 6f 72 69 67 2f 75   tcl8.6.0.orig/u
0070: 6e 69 78 2f 74 63 6c 55 6e 69 78 46 43 6d 64 2e  nix/tclUnixFCmd.
0080: 63 09 32 30 31 32 2d 31 31 2d 31 34 20 31 31 3a  c.2012-11-14 11:
0090: 31 39 3a 30 38 2e 30 30 30 30 30 30 30 30 30 20  19:08.000000000 
00a0: 2d 30 36 30 30 0a 2b 2b 2b 20 74 63 6c 38 2e 36  -0600.+++ tcl8.6
00b0: 2e 30 2d 62 75 67 33 36 31 33 35 36 37 2d 31 74  .0-bug3613567-1t
00c0: 6d 70 64 69 72 66 69 78 2f 75 6e 69 78 2f 74 63  mpdirfix/unix/tc
00d0: 6c 55 6e 69 78 46 43 6d 64 2e 63 09 32 30 31 33  lUnixFCmd.c.2013
00e0: 2d 30 35 2d 31 38 20 31 33 3a 33 34 3a 31 33 2e  -05-18 13:34:13.
00f0: 35 39 31 34 35 32 35 30 30 20 2d 30 35 30 30 0a  591452500 -0500.
0100: 40 40 20 2d 32 32 32 36 2c 31 33 20 2b 32 32 32  @@ -2226,13 +222
0110: 36 2c 31 33 20 40 40 0a 20 0a 20 20 20 20 20 64  6,13 @@. .     d
0120: 69 72 20 3d 20 67 65 74 65 6e 76 28 22 54 4d 50  ir = getenv("TMP
0130: 44 49 52 22 29 3b 0a 20 20 20 20 20 69 66 20 28  DIR");.     if (
0140: 64 69 72 20 26 26 20 64 69 72 5b 30 5d 20 26 26  dir && dir[0] &&
0150: 20 73 74 61 74 28 64 69 72 2c 20 26 62 75 66 29   stat(dir, &buf)
0160: 20 3d 3d 20 30 20 26 26 20 53 5f 49 53 44 49 52   == 0 && S_ISDIR
0170: 28 62 75 66 2e 73 74 5f 6d 6f 64 65 29 0a 2d 09  (buf.st_mode).-.
0180: 20 20 20 20 26 26 20 61 63 63 65 73 73 28 64 69      && access(di
0190: 72 2c 20 57 5f 4f 4b 29 29 20 7b 0a 2b 09 20 20  r, W_OK)) {.+.  
01a0: 20 20 26 26 20 61 63 63 65 73 73 28 64 69 72 2c    && access(dir,
01b0: 20 57 5f 4f 4b 29 20 3d 3d 20 30 29 20 7b 0a 20   W_OK) == 0) {. 
01c0: 09 72 65 74 75 72 6e 20 64 69 72 3b 0a 20 20 20  .return dir;.   
01d0: 20 20 7d 0a 20 0a 20 23 69 66 64 65 66 20 50 5f    }. . #ifdef P_
01e0: 74 6d 70 64 69 72 0a 20 20 20 20 20 64 69 72 20  tmpdir.     dir 
01f0: 3d 20 50 5f 74 6d 70 64 69 72 3b 0a 2d 20 20 20  = P_tmpdir;.-   
0200: 20 69 66 20 28 73 74 61 74 28 64 69 72 2c 20 26   if (stat(dir, &
0210: 62 75 66 29 20 3d 3d 20 30 20 26 26 20 53 5f 49  buf) == 0 && S_I
0220: 53 44 49 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65  SDIR(buf.st_mode
0230: 29 20 26 26 20 61 63 63 65 73 73 28 64 69 72 2c  ) && access(dir,
0240: 20 57 5f 4f 4b 29 29 20 7b 0a 2b 20 20 20 20 69   W_OK)) {.+    i
0250: 66 20 28 73 74 61 74 28 64 69 72 2c 20 26 62 75  f (stat(dir, &bu
0260: 66 29 20 3d 3d 20 30 20 26 26 20 53 5f 49 53 44  f) == 0 && S_ISD
0270: 49 52 28 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20  IR(buf.st_mode) 
0280: 26 26 20 61 63 63 65 73 73 28 64 69 72 2c 20 57  && access(dir, W
0290: 5f 4f 4b 29 20 3d 3d 20 30 29 20 7b 0a 20 09 72  _OK) == 0) {. .r
02a0: 65 74 75 72 6e 20 64 69 72 3b 0a 20 20 20 20 20  eturn dir;.     
02b0: 7d 0a 20 23 65 6e 64 69 66 0a                    }. #endif.