Artifact e64e21d80e4a03c855cf0ab9cbd330f3a2443ad7:

Manifest of check-in [e64e21d80e] - * tls.c (ImportObjCmd): removed unnecessary use of 'bio' arg. (Tls_Init): check return value of SSL_library_init. Also lots of whitespace cleanup (more like Tcl Eng style guide), but not all code was cleaned up. * tlsBIO.c: minor whitespace cleanup * tlsIO.c: minor whitespace cleanup. (TlsInputProc, TlsOutputProc): Added ERR_clear_error before calls to BIO_read or BIO_write, because we could otherwise end up pulling an error off the stack that didn't belong to us. Also cleanup up excessive use of gotos. by hobbs on 2000-07-26 22:15:07.

---

0000: 43 20 5c 74 2a 5c 73 74 6c 73 2e 63 5c 73 28 49  C \t*\stls.c\s(I
0010: 6d 70 6f 72 74 4f 62 6a 43 6d 64 29 3a 5c 73 72  mportObjCmd):\sr
0020: 65 6d 6f 76 65 64 5c 73 75 6e 6e 65 63 65 73 73  emoved\sunnecess
0030: 61 72 79 5c 73 75 73 65 5c 73 6f 66 5c 73 27 62  ary\suse\sof\s'b
0040: 69 6f 27 5c 73 61 72 67 2e 5c 6e 5c 74 28 54 6c  io'\sarg.\n\t(Tl
0050: 73 5f 49 6e 69 74 29 3a 5c 73 63 68 65 63 6b 5c  s_Init):\scheck\
0060: 73 72 65 74 75 72 6e 5c 73 76 61 6c 75 65 5c 73  sreturn\svalue\s
0070: 6f 66 5c 73 53 53 4c 5f 6c 69 62 72 61 72 79 5f  of\sSSL_library_
0080: 69 6e 69 74 2e 5c 73 5c 73 41 6c 73 6f 5c 73 6c  init.\s\sAlso\sl
0090: 6f 74 73 5c 73 6f 66 5c 6e 5c 74 77 68 69 74 65  ots\sof\n\twhite
00a0: 73 70 61 63 65 5c 73 63 6c 65 61 6e 75 70 5c 73  space\scleanup\s
00b0: 28 6d 6f 72 65 5c 73 6c 69 6b 65 5c 73 54 63 6c  (more\slike\sTcl
00c0: 5c 73 45 6e 67 5c 73 73 74 79 6c 65 5c 73 67 75  \sEng\sstyle\sgu
00d0: 69 64 65 29 2c 5c 73 62 75 74 5c 73 6e 6f 74 5c  ide),\sbut\snot\
00e0: 73 61 6c 6c 5c 6e 5c 74 63 6f 64 65 5c 73 77 61  sall\n\tcode\swa
00f0: 73 5c 73 63 6c 65 61 6e 65 64 5c 73 75 70 2e 5c  s\scleaned\sup.\
0100: 6e 5c 6e 5c 74 2a 5c 73 74 6c 73 42 49 4f 2e 63  n\n\t*\stlsBIO.c
0110: 3a 5c 73 6d 69 6e 6f 72 5c 73 77 68 69 74 65 73  :\sminor\swhites
0120: 70 61 63 65 5c 73 63 6c 65 61 6e 75 70 5c 6e 5c  pace\scleanup\n\
0130: 6e 5c 74 2a 5c 73 74 6c 73 49 4f 2e 63 3a 5c 73  n\t*\stlsIO.c:\s
0140: 6d 69 6e 6f 72 5c 73 77 68 69 74 65 73 70 61 63  minor\swhitespac
0150: 65 5c 73 63 6c 65 61 6e 75 70 2e 5c 6e 5c 74 28  e\scleanup.\n\t(
0160: 54 6c 73 49 6e 70 75 74 50 72 6f 63 2c 5c 73 54  TlsInputProc,\sT
0170: 6c 73 4f 75 74 70 75 74 50 72 6f 63 29 3a 5c 73  lsOutputProc):\s
0180: 41 64 64 65 64 5c 73 45 52 52 5f 63 6c 65 61 72  Added\sERR_clear
0190: 5f 65 72 72 6f 72 5c 73 62 65 66 6f 72 65 5c 73  _error\sbefore\s
01a0: 63 61 6c 6c 73 5c 6e 5c 74 74 6f 5c 73 42 49 4f  calls\n\tto\sBIO
01b0: 5f 72 65 61 64 5c 73 6f 72 5c 73 42 49 4f 5f 77  _read\sor\sBIO_w
01c0: 72 69 74 65 2c 5c 73 62 65 63 61 75 73 65 5c 73  rite,\sbecause\s
01d0: 77 65 5c 73 63 6f 75 6c 64 5c 73 6f 74 68 65 72  we\scould\sother
01e0: 77 69 73 65 5c 73 65 6e 64 5c 73 75 70 5c 6e 5c  wise\send\sup\n\
01f0: 74 70 75 6c 6c 69 6e 67 5c 73 61 6e 5c 73 65 72  tpulling\san\ser
0200: 72 6f 72 5c 73 6f 66 66 5c 73 74 68 65 5c 73 73  ror\soff\sthe\ss
0210: 74 61 63 6b 5c 73 74 68 61 74 5c 73 64 69 64 6e  tack\sthat\sdidn
0220: 27 74 5c 73 62 65 6c 6f 6e 67 5c 73 74 6f 5c 73  't\sbelong\sto\s
0230: 75 73 2e 5c 73 5c 73 41 6c 73 6f 5c 6e 5c 74 63  us.\s\sAlso\n\tc
0240: 6c 65 61 6e 75 70 5c 73 75 70 5c 73 65 78 63 65  leanup\sup\sexce
0250: 73 73 69 76 65 5c 73 75 73 65 5c 73 6f 66 5c 73  ssive\suse\sof\s
0260: 67 6f 74 6f 73 2e 5c 6e 0a 44 20 32 30 30 30 2d  gotos.\n.D 2000-
0270: 30 37 2d 32 36 54 32 32 3a 31 35 3a 30 37 2e 30  07-26T22:15:07.0
0280: 30 30 0a 46 20 43 68 61 6e 67 65 4c 6f 67 20 32  00.F ChangeLog 2
0290: 61 63 63 64 35 31 38 62 65 33 61 37 62 37 61 32  accd518be3a7b7a2
02a0: 37 62 66 63 61 31 30 34 30 66 39 31 62 31 66 31  7bfca1040f91b1f1
02b0: 34 31 39 39 34 33 35 0a 46 20 4d 61 6b 65 66 69  4199435.F Makefi
02c0: 6c 65 2e 69 6e 20 61 32 36 61 30 36 35 33 31 37  le.in a26a065317
02d0: 33 62 37 61 36 61 61 30 36 62 64 38 65 62 37 35  3b7a6aa06bd8eb75
02e0: 36 39 31 39 32 36 39 61 34 33 33 36 63 37 0a 46  6919269a4336c7.F
02f0: 20 52 45 41 44 4d 45 2e 74 78 74 20 62 37 61 32   README.txt b7a2
0300: 37 30 39 61 38 32 32 66 65 30 31 64 37 38 65 37  709a822fe01d78e7
0310: 61 61 37 39 63 30 32 34 39 35 31 34 33 64 66 35  aa79c02495143df5
0320: 30 35 66 64 0a 46 20 61 63 6c 6f 63 61 6c 2e 6d  05fd.F aclocal.m
0330: 34 20 37 33 61 61 63 36 33 32 30 65 37 62 36 65  4 73aac6320e7b6e
0340: 33 37 62 63 38 65 65 33 63 38 65 61 62 37 65 39  37bc8ee3c8eab7e9
0350: 32 64 62 65 65 62 61 65 30 63 0a 46 20 63 6f 6e  2dbeebae0c.F con
0360: 66 69 67 75 72 65 2e 69 6e 20 66 37 31 30 36 63  figure.in f7106c
0370: 61 63 63 34 34 61 39 36 34 30 30 31 38 61 35 35  acc44a9640018a55
0380: 61 39 37 61 64 37 61 64 38 64 65 38 33 36 35 64  a97ad7ad8de8365d
0390: 33 30 0a 46 20 66 69 78 73 74 72 74 6f 64 2e 63  30.F fixstrtod.c
03a0: 20 30 39 37 63 33 39 61 32 61 36 37 30 66 66 65   097c39a2a670ffe
03b0: 63 36 34 34 61 39 32 35 61 35 63 62 65 65 32 30  c644a925a5cbee20
03c0: 30 36 33 32 37 65 65 37 38 0a 46 20 6c 69 63 65  06327ee78.F lice
03d0: 6e 73 65 2e 74 65 72 6d 73 20 37 36 37 63 61 35  nse.terms 767ca5
03e0: 38 31 37 33 33 66 38 61 34 31 34 32 65 32 36 33  81733f8a4142e263
03f0: 64 65 37 37 61 62 38 33 35 66 62 34 62 66 62 62  de77ab835fb4bfbb
0400: 65 66 0a 46 20 70 6b 67 49 6e 64 65 78 2e 74 63  ef.F pkgIndex.tc
0410: 6c 2e 69 6e 20 61 37 64 61 61 36 64 30 38 39 37  l.in a7daa6d0897
0420: 38 64 35 30 36 34 38 31 37 34 39 33 62 37 30 31  8d5064817493b701
0430: 31 65 33 65 66 38 66 33 33 63 38 62 35 0a 46 20  1e3ef8f33c8b5.F 
0440: 73 74 72 6e 63 61 73 65 63 6d 70 2e 63 20 64 33  strncasecmp.c d3
0450: 30 38 30 61 32 61 63 30 34 65 66 33 36 65 62 35  080a2ac04ef36eb5
0460: 62 32 65 62 36 64 34 66 37 36 37 34 36 32 37 63  b2eb6d4f7674627c
0470: 35 34 62 31 65 34 0a 46 20 74 63 6c 4f 70 74 73  54b1e4.F tclOpts
0480: 2e 68 20 34 65 33 63 32 61 38 33 39 37 62 31 36  .h 4e3c2a8397b16
0490: 33 35 32 39 31 31 61 66 30 30 61 34 61 33 30 34  352911af00a4a304
04a0: 38 30 64 35 62 62 33 63 32 64 37 0a 46 20 74 65  80d5bb3c2d7.F te
04b0: 73 74 73 2f 61 6c 6c 2e 74 63 6c 20 62 37 36 65  sts/all.tcl b76e
04c0: 38 30 65 61 62 38 34 37 37 33 38 63 31 32 64 32  80eab847738c12d2
04d0: 31 31 34 62 64 30 65 61 31 39 33 38 65 31 35 35  114bd0ea1938e155
04e0: 36 32 39 63 0a 46 20 74 65 73 74 73 2f 63 65 72  629c.F tests/cer
04f0: 74 73 2f 63 61 63 65 72 74 2e 70 65 6d 20 66 35  ts/cacert.pem f5
0500: 31 31 31 63 32 65 34 39 39 64 39 31 31 61 32 62  111c2e499d911a2b
0510: 39 61 66 63 39 34 32 39 36 30 32 30 62 61 33 61  9afc94296020ba3a
0520: 32 38 66 31 64 35 0a 46 20 74 65 73 74 73 2f 63  28f1d5.F tests/c
0530: 65 72 74 73 2f 63 6b 65 79 2e 70 65 6d 20 37 32  erts/ckey.pem 72
0540: 34 61 31 63 65 32 31 31 66 34 64 39 66 35 31 66  4a1ce211f4d9f51f
0550: 37 34 62 66 38 37 39 36 38 31 62 37 39 30 31 64  74bf879681b7901d
0560: 63 64 37 34 34 34 0a 46 20 74 65 73 74 73 2f 63  cd7444.F tests/c
0570: 65 72 74 73 2f 63 6c 69 65 6e 74 2e 70 65 6d 20  erts/client.pem 
0580: 35 66 62 64 63 35 32 66 35 62 36 62 39 30 61 31  5fbdc52f5b6b90a1
0590: 62 32 62 63 33 36 36 31 61 62 31 63 32 63 32 36  b2bc3661ab1c2c26
05a0: 37 61 63 35 34 32 63 66 0a 46 20 74 65 73 74 73  7ac542cf.F tests
05b0: 2f 63 65 72 74 73 2f 73 65 72 76 65 72 2e 70 65  /certs/server.pe
05c0: 6d 20 61 36 34 33 30 30 62 34 33 62 35 30 38 34  m a64300b43b5084
05d0: 32 62 62 30 34 37 35 33 39 61 37 66 62 65 38 38  2bb047539a7fbe88
05e0: 33 34 61 66 32 37 37 66 65 35 0a 46 20 74 65 73  34af277fe5.F tes
05f0: 74 73 2f 63 65 72 74 73 2f 73 6b 65 79 2e 70 65  ts/certs/skey.pe
0600: 6d 20 33 31 63 34 33 65 66 31 32 31 34 37 31 63  m 31c43ef121471c
0610: 65 65 35 31 61 66 61 36 31 62 38 32 66 31 32 39  ee51afa61b82f129
0620: 62 65 37 37 34 34 35 32 63 38 0a 46 20 74 65 73  be774452c8.F tes
0630: 74 73 2f 63 69 70 68 65 72 73 2e 74 65 73 74 20  ts/ciphers.test 
0640: 38 32 30 65 35 65 36 30 31 65 31 64 34 61 30 31  820e5e601e1d4a01
0650: 30 62 62 63 65 61 30 32 34 37 66 30 61 64 37 33  0bbcea0247f0ad73
0660: 61 36 37 38 36 31 35 63 0a 46 20 74 65 73 74 73  a678615c.F tests
0670: 2f 6f 6c 64 54 65 73 74 73 2f 63 6c 69 65 6e 74  /oldTests/client
0680: 2e 70 65 6d 20 37 39 63 37 64 63 61 61 33 64 66  .pem 79c7dcaa3df
0690: 37 63 39 64 63 31 39 62 39 36 63 30 38 63 39 63  7c9dc19b96c08c9c
06a0: 39 37 32 64 36 37 34 35 32 66 39 37 38 0a 46 20  972d67452f978.F 
06b0: 74 65 73 74 73 2f 6f 6c 64 54 65 73 74 73 2f 73  tests/oldTests/s
06c0: 65 72 76 65 72 2e 70 65 6d 20 39 31 62 34 65 62  erver.pem 91b4eb
06d0: 36 31 31 32 39 33 39 30 62 65 65 65 32 35 33 37  61129390beee2537
06e0: 38 36 32 36 64 36 37 33 32 39 65 37 31 66 35 63  8626d67329e71f5c
06f0: 65 66 0a 46 20 74 65 73 74 73 2f 6f 6c 64 54 65  ef.F tests/oldTe
0700: 73 74 73 2f 74 6c 73 2e 74 63 6c 20 64 33 61 62  sts/tls.tcl d3ab
0710: 30 66 33 66 63 34 35 33 39 65 33 62 34 63 35 64  0f3fc4539e3b4c5d
0720: 65 62 30 33 30 61 65 61 36 33 65 61 34 37 38 65  eb030aea63ea478e
0730: 62 32 66 62 0a 46 20 74 65 73 74 73 2f 6f 6c 64  b2fb.F tests/old
0740: 54 65 73 74 73 2f 74 6c 73 41 75 74 6f 2e 74 63  Tests/tlsAuto.tc
0750: 6c 20 61 66 35 35 39 62 63 32 64 63 31 34 35 37  l af559bc2dc1457
0760: 63 32 33 31 61 63 61 65 65 64 31 65 62 39 62 63  c231acaeed1eb9bc
0770: 34 34 65 61 62 33 66 30 61 33 0a 46 20 74 65 73  44eab3f0a3.F tes
0780: 74 73 2f 6f 6c 64 54 65 73 74 73 2f 74 6c 73 42  ts/oldTests/tlsB
0790: 6c 6f 63 6b 69 6e 67 2e 74 63 6c 20 31 30 61 39  locking.tcl 10a9
07a0: 63 65 33 36 65 36 62 35 39 36 66 32 37 38 37 30  ce36e6b596f27870
07b0: 38 64 64 30 61 65 34 36 66 37 32 36 35 66 63 61  8dd0ae46f7265fca
07c0: 62 31 65 34 0a 46 20 74 65 73 74 73 2f 6f 6c 64  b1e4.F tests/old
07d0: 54 65 73 74 73 2f 74 6c 73 43 69 70 68 65 72 73  Tests/tlsCiphers
07e0: 2e 74 63 6c 20 30 31 35 63 65 62 62 32 61 34 66  .tcl 015cebb2a4f
07f0: 66 61 61 62 63 64 32 39 31 35 32 32 32 38 30 65  faabcd291522280e
0800: 35 63 33 31 31 65 66 65 39 65 66 34 37 0a 46 20  5c311efe9ef47.F 
0810: 74 65 73 74 73 2f 6f 6c 64 54 65 73 74 73 2f 74  tests/oldTests/t
0820: 6c 73 48 74 74 70 2e 74 63 6c 20 61 37 30 64 62  lsHttp.tcl a70db
0830: 62 33 31 39 34 31 65 61 61 61 34 39 39 31 31 61  b31941eaaa49911a
0840: 63 64 34 64 66 64 64 30 61 62 32 65 31 64 39 31  cd4dfdd0ab2e1d91
0850: 39 37 32 0a 46 20 74 65 73 74 73 2f 6f 6c 64 54  972.F tests/oldT
0860: 65 73 74 73 2f 74 6c 73 53 72 76 2e 74 63 6c 20  ests/tlsSrv.tcl 
0870: 39 34 33 37 36 65 31 37 63 30 31 30 39 37 32 63  94376e17c010972c
0880: 33 38 39 32 33 31 61 33 39 30 37 37 64 33 35 62  389231a39077d35b
0890: 64 37 33 63 39 66 66 38 0a 46 20 74 65 73 74 73  d73c9ff8.F tests
08a0: 2f 6f 6c 64 54 65 73 74 73 2f 74 6c 73 53 72 76  /oldTests/tlsSrv
08b0: 32 2e 74 63 6c 20 35 35 66 66 61 37 32 63 65 38  2.tcl 55ffa72ce8
08c0: 63 32 61 63 66 36 31 35 33 36 37 62 62 31 32 36  c2acf615367bb126
08d0: 39 66 31 39 37 35 37 37 33 37 34 38 34 63 0a 46  9f19757737484c.F
08e0: 20 74 65 73 74 73 2f 6f 6c 64 54 65 73 74 73 2f   tests/oldTests/
08f0: 74 6c 73 55 70 6c 6f 61 64 2e 74 63 6c 20 38 32  tlsUpload.tcl 82
0900: 63 39 65 36 63 31 31 38 32 36 65 31 33 32 34 30  c9e6c11826e13240
0910: 65 30 34 66 63 32 33 33 34 31 38 36 35 37 62 30  e04fc233418657b0
0920: 63 65 62 35 63 36 0a 46 20 74 65 73 74 73 2f 72  ceb5c6.F tests/r
0930: 65 6d 6f 74 65 2e 74 63 6c 20 32 36 66 35 33 32  emote.tcl 26f532
0940: 35 35 61 35 61 39 35 62 32 32 36 32 31 31 64 37  55a5a95b226211d7
0950: 38 39 37 63 39 62 65 30 66 39 33 64 37 62 36 32  897c9be0f93d7b62
0960: 38 62 20 78 0a 46 20 74 65 73 74 73 2f 74 6c 73  8b x.F tests/tls
0970: 49 4f 2e 74 65 73 74 20 32 65 33 61 36 65 63 64  IO.test 2e3a6ecd
0980: 38 38 38 35 37 63 32 34 64 61 31 38 66 30 31 65  88857c24da18f01e
0990: 61 34 66 37 35 36 37 63 35 32 38 37 65 36 37 62  a4f7567c5287e67b
09a0: 20 78 0a 46 20 74 6c 73 2e 63 20 64 37 39 33 62   x.F tls.c d793b
09b0: 62 63 32 32 39 39 61 38 33 34 34 66 37 62 36 36  bc2299a8344f7b66
09c0: 65 66 31 31 30 36 32 33 66 65 66 30 31 36 34 62  ef110623fef0164b
09d0: 30 33 61 0a 46 20 74 6c 73 2e 68 20 64 63 39 36  03a.F tls.h dc96
09e0: 61 31 36 32 33 65 33 32 66 37 63 66 64 66 31 31  a1623e32f7cfdf11
09f0: 36 33 36 39 64 64 65 35 64 35 61 36 62 35 32 36  6369dde5d5a6b526
0a00: 34 35 31 34 0a 46 20 74 6c 73 2e 68 74 6d 20 34  4514.F tls.htm 4
0a10: 61 38 63 35 64 34 33 62 36 32 66 31 32 65 34 35  a8c5d43b62f12e45
0a20: 36 66 38 66 63 39 37 63 36 30 36 32 32 62 65 63  6f8fc97c60622bec
0a30: 37 30 63 33 63 30 33 0a 46 20 74 6c 73 2e 74 63  70c3c03.F tls.tc
0a40: 6c 20 65 65 31 32 35 63 66 37 33 39 38 63 34 63  l ee125cf7398c4c
0a50: 34 65 31 64 32 33 35 64 35 33 63 63 63 37 61 64  4e1d235d53ccc7ad
0a60: 37 66 61 63 35 34 66 30 33 31 0a 46 20 74 6c 73  7fac54f031.F tls
0a70: 42 49 4f 2e 63 20 38 61 37 64 37 39 32 65 63 35  BIO.c 8a7d792ec5
0a80: 64 62 31 63 63 66 65 63 64 35 35 39 38 63 34 63  db1ccfecd5598c4c
0a90: 38 34 31 34 32 64 33 37 35 65 62 62 39 30 0a 46  84142d375ebb90.F
0aa0: 20 74 6c 73 49 4f 2e 63 20 31 63 62 62 38 30 63   tlsIO.c 1cbb80c
0ab0: 36 39 62 66 61 38 32 32 32 39 34 30 61 66 32 35  69bfa8222940af25
0ac0: 64 36 35 65 30 61 32 66 38 35 32 36 63 62 34 31  d65e0a2f8526cb41
0ad0: 63 0a 46 20 74 6c 73 49 6e 74 2e 68 20 62 35 62  c.F tlsInt.h b5b
0ae0: 39 39 38 34 34 62 37 63 33 37 66 39 63 63 36 34  99844b7c37f9cc64
0af0: 39 66 30 31 30 63 34 36 66 34 33 38 36 31 64 38  9f010c46f43861d8
0b00: 30 32 31 62 66 0a 46 20 74 6c 73 58 35 30 39 2e  021bf.F tlsX509.
0b10: 63 20 33 61 32 35 65 36 34 35 62 63 66 36 36 34  c 3a25e645bcf664
0b20: 33 38 66 30 63 38 35 39 64 32 62 66 64 66 63 37  38f0c859d2bfdfc7
0b30: 36 61 35 30 34 65 64 32 36 31 0a 50 20 39 37 37  6a504ed261.P 977
0b40: 39 38 38 61 65 64 36 36 63 33 30 61 37 66 36 62  988aed66c30a7f6b
0b50: 61 61 33 63 66 37 32 31 37 64 64 37 62 36 61 61  aa3cf7217dd7b6aa
0b60: 62 62 36 62 64 0a 55 20 68 6f 62 62 73 0a 5a 20  bb6bd.U hobbs.Z 
0b70: 62 30 65 35 66 34 65 61 65 36 33 31 37 66 33 33  b0e5f4eae6317f33
0b80: 62 38 30 36 66 65 64 36 32 64 34 65 65 31 34 66  b806fed62d4ee14f
0b90: 0a                                               .