Hex Artifact Content

Artifact ad5da5f1b314f6c2f37bd2f113fbdba6341f5ad48bad4ad974e404fe59efa4a3:

Ticket change [ad5da5f1b3] - New ticket [2cc408bd36869239|2cc408bd36] <i>Does 2.0b2 work with OpenSSL 3.0.x?</i>. by anonymous on 2025-11-05 07:17:32.
0000: 44 20 32 30 32 35 2d 31 31 2d 30 35 54 30 37 3a  D 2025-11-05T07:
0010: 31 37 3a 33 32 2e 39 34 39 0a 4a 20 66 6f 75 6e  17:32.949.J foun
0020: 64 69 6e 20 32 2e 30 62 32 0a 4a 20 69 63 6f 6d  din 2.0b2.J icom
0030: 6d 65 6e 74 20 49 5c 73 68 61 76 65 5c 73 74 68  ment I\shave\sth
0040: 65 5c 73 73 75 63 63 65 73 73 66 75 6c 6c 79 5c  e\ssuccessfully\
0050: 73 62 75 69 6c 74 5c 73 74 68 65 5c 73 6c 61 74  sbuilt\sthe\slat
0060: 65 73 74 5c 73 73 6f 75 72 63 65 5c 73 63 6f 64  est\ssource\scod
0070: 65 5c 73 6f 66 5c 73 54 63 6c 5c 73 54 4c 53 5c  e\sof\sTcl\sTLS\
0080: 73 28 68 74 74 70 73 3a 2f 2f 63 6f 72 65 2e 74  s(https://core.t
0090: 63 6c 2d 6c 61 6e 67 2e 6f 72 67 2f 74 63 6c 74  cl-lang.org/tclt
00a0: 6c 73 2f 69 6e 66 6f 2f 34 64 66 62 64 38 31 31  ls/info/4dfbd811
00b0: 62 34 61 31 36 33 66 37 29 5c 73 77 69 74 68 5c  b4a163f7)\swith\
00c0: 73 4f 70 65 6e 53 53 4c 5c 73 33 2e 30 2e 31 38  sOpenSSL\s3.0.18
00d0: 5c 73 6f 6e 5c 73 62 6f 74 68 5c 73 4c 69 6e 75  \son\sboth\sLinu
00e0: 78 5c 73 61 6e 64 5c 73 57 69 6e 64 6f 77 73 2e  x\sand\sWindows.
00f0: 5c 73 57 68 69 6c 65 5c 73 74 68 65 5c 73 73 69  \sWhile\sthe\ssi
0100: 6d 70 6c 65 5c 73 74 65 73 74 69 6e 67 5c 73 66  mple\stesting\sf
0110: 61 69 6c 65 64 2c 5c 73 74 68 65 5c 73 74 65 73  ailed,\sthe\stes
0120: 74 5c 73 77 6f 72 6b 65 64 5c 73 66 69 6e 65 5c  t\sworked\sfine\
0130: 73 77 69 74 68 5c 73 6f 6c 64 5c 73 31 2e 37 2f  swith\sold\s1.7/
0140: 31 2e 38 5c 73 77 69 74 68 5c 73 4f 70 65 6e 53  1.8\swith\sOpenS
0150: 53 4c 5c 73 31 2e 31 2e 31 6b 2e 5c 72 5c 6e 2d  SL\s1.1.1k.\r\n-
0160: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0170: 2d 2d 2d 2d 5c 72 5c 6e 43 3a 5c 5c 78 74 6f 72  ----\r\nC:\\xtor
0180: 5c 5c 73 62 69 6e 3e 74 63 6c 5c 73 5c 5c 64 65  \\sbin>tcl\s\\de
0190: 76 6d 61 70 5c 5c 74 63 6c 74 6c 73 5c 5c 45 6d  vmap\\tcltls\\Em
01a0: 61 69 6c 2e 74 63 6c 5c 72 5c 6e 3a 3a 6d 69 6d  ail.tcl\r\n::mim
01b0: 65 3a 3a 31 5c 72 5c 6e 54 72 79 69 6e 67 5c 73  e::1\r\nTrying\s
01c0: 73 6d 74 70 2e 73 69 6e 61 2e 63 6f 6d 2e 2e 2e  smtp.sina.com...
01d0: 5c 72 5c 6e 3c 2d 2d 5c 73 32 32 30 5c 73 73 6d  \r\n<--\s220\ssm
01e0: 74 70 2d 32 35 30 2d 32 32 2e 73 6d 74 70 73 6d  tp-250-22.smtpsm
01f0: 61 69 6c 2e 66 6d 61 69 6c 2e 79 66 2e 73 69 6e  ail.fmail.yf.sin
0200: 61 6e 6f 64 65 2e 63 6f 6d 5c 73 45 53 4d 54 50  anode.com\sESMTP
0210: 5c 72 5c 6e 2d 2d 3e 5c 73 45 48 4c 4f 5c 73 63  \r\n-->\sEHLO\sc
0220: 6e 73 68 6e 74 77 75 30 32 5c 73 28 77 61 69 74  nshntwu02\s(wait
0230: 5c 73 75 70 74 6f 5c 73 33 30 30 5c 73 73 65 63  \supto\s300\ssec
0240: 6f 6e 64 73 29 5c 72 5c 6e 3c 2d 2d 5c 73 32 35  onds)\r\n<--\s25
0250: 30 2d 73 6d 74 70 2d 32 35 30 2d 32 32 2e 73 6d  0-smtp-250-22.sm
0260: 74 70 73 6d 61 69 6c 2e 66 6d 61 69 6c 2e 79 66  tpsmail.fmail.yf
0270: 2e 73 69 6e 61 6e 6f 64 65 2e 63 6f 6d 5c 72 5c  .sinanode.com\r\
0280: 6e 3c 2d 2d 5c 73 32 35 30 2d 41 55 54 48 5c 73  n<--\s250-AUTH\s
0290: 4c 4f 47 49 4e 5c 73 50 4c 41 49 4e 5c 72 5c 6e  LOGIN\sPLAIN\r\n
02a0: 3c 2d 2d 5c 73 32 35 30 2d 41 55 54 48 3d 4c 4f  <--\s250-AUTH=LO
02b0: 47 49 4e 5c 73 50 4c 41 49 4e 5c 72 5c 6e 3c 2d  GIN\sPLAIN\r\n<-
02c0: 2d 5c 73 32 35 30 2d 53 54 41 52 54 54 4c 53 5c  -\s250-STARTTLS\
02d0: 72 5c 6e 3c 2d 2d 5c 73 32 35 30 5c 73 38 42 49  r\n<--\s250\s8BI
02e0: 54 4d 49 4d 45 5c 72 5c 6e 2d 2d 3e 5c 73 53 54  TMIME\r\n-->\sST
02f0: 41 52 54 54 4c 53 5c 73 28 77 61 69 74 5c 73 75  ARTTLS\s(wait\su
0300: 70 74 6f 5c 73 33 30 30 5c 73 73 65 63 6f 6e 64  pto\s300\ssecond
0310: 73 29 5c 72 5c 6e 3c 2d 2d 5c 73 32 32 30 5c 73  s)\r\n<--\s220\s
0320: 72 65 61 64 79 5c 73 66 6f 72 5c 73 74 6c 73 5c  ready\sfor\stls\
0330: 72 5c 6e 2d 2d 3e 5c 73 45 48 4c 4f 5c 73 63 6e  r\n-->\sEHLO\scn
0340: 73 68 6e 74 77 75 30 32 5c 73 28 77 61 69 74 5c  shntwu02\s(wait\
0350: 73 75 70 74 6f 5c 73 33 30 30 5c 73 73 65 63 6f  supto\s300\sseco
0360: 6e 64 73 29 5c 72 5c 6e 5e 43 5c 72 5c 6e 5c 72  nds)\r\n^C\r\n\r
0370: 5c 6e 5c 72 5c 6e 54 68 65 5c 73 73 63 72 69 70  \n\r\nThe\sscrip
0380: 74 5c 73 67 6f 65 73 5c 73 6c 69 6b 65 2c 5c 72  t\sgoes\slike,\r
0390: 5c 6e 5c 72 5c 6e 23 49 6e 69 74 69 61 6c 69 7a  \n\r\n#Initializ
03a0: 65 5c 73 45 6d 61 69 6c 5c 73 4f 70 74 69 6f 6e  e\sEmail\sOption
03b0: 5c 73 41 72 72 61 79 5c 72 5c 6e 73 65 74 5c 73  \sArray\r\nset\s
03c0: 61 4d 61 69 6c 28 53 45 52 56 45 52 29 5c 73 22  aMail(SERVER)\s"
03d0: 73 6d 74 70 5c 73 53 45 52 56 45 52 5c 73 61 64  smtp\sSERVER\sad
03e0: 64 72 65 73 73 22 5c 72 5c 6e 73 65 74 5c 73 61  dress"\r\nset\sa
03f0: 4d 61 69 6c 28 50 4f 52 54 29 5c 73 35 38 37 5c  Mail(PORT)\s587\
0400: 72 5c 6e 73 65 74 5c 73 61 4d 61 69 6c 28 46 52  r\nset\saMail(FR
0410: 4f 4d 29 5c 73 22 78 78 78 40 78 78 78 6d 22 5c  OM)\s"xxx@xxxm"\
0420: 73 5c 72 5c 6e 73 65 74 5c 73 61 4d 61 69 6c 28  s\r\nset\saMail(
0430: 46 52 4f 4d 5f 4e 41 4d 45 29 5c 73 22 53 79 73  FROM_NAME)\s"Sys
0440: 74 65 6d 5c 73 28 63 29 5c 73 2d 5c 73 44 6f 5c  tem\s(c)\s-\sDo\
0450: 73 4e 6f 74 5c 73 52 65 70 6c 79 22 5c 72 5c 6e  sNot\sReply"\r\n
0460: 73 65 74 5c 73 61 4d 61 69 6c 28 54 4f 29 5c 73  set\saMail(TO)\s
0470: 22 77 72 65 6e 61 73 68 65 40 67 6d 61 69 6c 2e  "wrenashe@gmail.
0480: 63 6f 6d 22 5c 72 5c 6e 73 65 74 5c 73 61 4d 61  com"\r\nset\saMa
0490: 69 6c 28 53 55 42 4a 29 5c 73 22 54 63 6c 74 6c  il(SUBJ)\s"Tcltl
04a0: 73 2d 32 2e 30 62 32 5c 73 74 65 73 74 5c 73 72  s-2.0b2\stest\sr
04b0: 65 73 75 6c 74 22 5c 72 5c 6e 73 65 74 5c 73 61  esult"\r\nset\sa
04c0: 4d 61 69 6c 28 4d 53 47 29 5c 73 22 54 63 6c 74  Mail(MSG)\s"Tclt
04d0: 6c 73 2d 32 2e 30 62 32 5c 73 74 65 73 74 5c 73  ls-2.0b2\stest\s
04e0: 72 65 73 75 6c 74 22 5c 72 5c 6e 73 65 74 5c 73  result"\r\nset\s
04f0: 61 4d 61 69 6c 28 49 4d 50 4f 52 54 41 4e 43 45  aMail(IMPORTANCE
0500: 29 5c 73 22 22 5c 72 5c 6e 73 65 74 5c 73 73 45  )\s""\r\nset\ssE
0510: 6d 61 69 6c 52 63 5c 73 22 22 5c 73 5c 72 5c 6e  mailRc\s""\s\r\n
0520: 73 65 74 5c 73 6f 4d 61 69 6c 54 6f 6b 65 6e 5c  set\soMailToken\
0530: 73 5b 6d 69 6d 65 3a 3a 69 6e 69 74 69 61 6c 69  s[mime::initiali
0540: 7a 65 5c 73 2d 63 61 6e 6f 6e 69 63 61 6c 5c 73  ze\s-canonical\s
0550: 74 65 78 74 2f 68 74 6d 6c 5c 73 2d 73 74 72 69  text/html\s-stri
0560: 6e 67 5c 73 24 61 4d 61 69 6c 28 4d 53 47 29 5d  ng\s$aMail(MSG)]
0570: 5c 72 5c 6e 70 75 74 73 5c 73 24 6f 4d 61 69 6c  \r\nputs\s$oMail
0580: 54 6f 6b 65 6e 5c 72 5c 6e 73 65 74 5c 73 73 4d  Token\r\nset\ssM
0590: 61 69 6c 55 73 65 72 5c 73 22 63 69 73 74 65 73  ailUser\s"cistes
05a0: 74 69 6e 67 40 73 69 6e 61 2e 63 6f 6d 22 5c 72  ting@sina.com"\r
05b0: 5c 6e 73 65 74 5c 73 73 4d 61 69 6c 50 61 73 73  \nset\ssMailPass
05c0: 5c 73 22 50 61 73 73 77 6f 72 64 30 31 26 22 5c  \s"Password01&"\
05d0: 72 5c 6e 69 66 5c 73 7b 5b 63 61 74 63 68 5c 73  r\nif\s{[catch\s
05e0: 7b 5c 73 73 65 74 5c 73 73 45 6d 61 69 6c 52 63  {\sset\ssEmailRc
05f0: 5c 73 5b 73 6d 74 70 3a 3a 73 65 6e 64 6d 65 73  \s[smtp::sendmes
0600: 73 61 67 65 5c 73 24 6f 4d 61 69 6c 54 6f 6b 65  sage\s$oMailToke
0610: 6e 5c 73 5c 5c 5c 72 5c 6e 5c 73 5c 73 5c 73 5c  n\s\\\r\n\s\s\s\
0620: 73 2d 6f 72 69 67 69 6e 61 74 6f 72 5c 73 24 61  s-originator\s$a
0630: 4d 61 69 6c 28 46 52 4f 4d 29 5c 73 5c 5c 5c 72  Mail(FROM)\s\\\r
0640: 5c 6e 5c 73 5c 73 5c 73 5c 73 2d 72 65 63 69 70  \n\s\s\s\s-recip
0650: 69 65 6e 74 73 5c 73 24 61 4d 61 69 6c 28 54 4f  ients\s$aMail(TO
0660: 29 5c 73 5c 5c 5c 72 5c 6e 5c 73 5c 73 5c 73 5c  )\s\\\r\n\s\s\s\
0670: 73 2d 73 65 72 76 65 72 73 5c 73 24 61 4d 61 69  s-servers\s$aMai
0680: 6c 28 53 45 52 56 45 52 29 5c 73 5c 5c 5c 72 5c  l(SERVER)\s\\\r\
0690: 6e 5c 73 5c 73 5c 73 5c 73 2d 70 6f 72 74 73 5c  n\s\s\s\s-ports\
06a0: 73 24 61 4d 61 69 6c 28 50 4f 52 54 29 5c 73 5c  s$aMail(PORT)\s\
06b0: 5c 5c 72 5c 6e 5c 74 2d 75 73 65 72 6e 61 6d 65  \\r\n\t-username
06c0: 5c 73 24 73 4d 61 69 6c 55 73 65 72 5c 73 5c 5c  \s$sMailUser\s\\
06d0: 5c 72 5c 6e 5c 74 2d 70 61 73 73 77 6f 72 64 5c  \r\n\t-password\
06e0: 73 24 73 4d 61 69 6c 50 61 73 73 5c 73 5c 5c 5c  s$sMailPass\s\\\
06f0: 72 5c 6e 5c 73 5c 73 5c 73 5c 73 2d 68 65 61 64  r\n\s\s\s\s-head
0700: 65 72 5c 73 5b 6c 69 73 74 5c 73 46 72 6f 6d 5c  er\s[list\sFrom\
0710: 73 22 5c 5c 22 24 61 4d 61 69 6c 28 46 52 4f 4d  s"\\"$aMail(FROM
0720: 5f 4e 41 4d 45 29 5c 5c 22 5c 73 3c 24 61 4d 61  _NAME)\\"\s<$aMa
0730: 69 6c 28 46 52 4f 4d 29 3e 22 5d 5c 73 5c 5c 5c  il(FROM)>"]\s\\\
0740: 72 5c 6e 5c 73 5c 73 5c 73 5c 73 2d 68 65 61 64  r\n\s\s\s\s-head
0750: 65 72 5c 73 5b 6c 69 73 74 5c 73 54 6f 5c 73 24  er\s[list\sTo\s$
0760: 61 4d 61 69 6c 28 54 4f 29 5d 5c 73 5c 5c 5c 72  aMail(TO)]\s\\\r
0770: 5c 6e 5c 73 5c 73 5c 73 5c 73 2d 68 65 61 64 65  \n\s\s\s\s-heade
0780: 72 5c 73 5b 6c 69 73 74 5c 73 49 6d 70 6f 72 74  r\s[list\sImport
0790: 61 6e 63 65 5c 73 24 61 4d 61 69 6c 28 49 4d 50  ance\s$aMail(IMP
07a0: 4f 52 54 41 4e 43 45 29 5d 5c 73 5c 5c 5c 72 5c  ORTANCE)]\s\\\r\
07b0: 6e 5c 73 5c 73 5c 73 5c 73 2d 68 65 61 64 65 72  n\s\s\s\s-header
07c0: 5c 73 5b 6c 69 73 74 5c 73 53 75 62 6a 65 63 74  \s[list\sSubject
07d0: 5c 73 24 61 4d 61 69 6c 28 53 55 42 4a 29 5d 5c  \s$aMail(SUBJ)]\
07e0: 73 2d 75 73 65 74 6c 73 5c 73 31 5c 73 5c 73 2d  s-usetls\s1\s\s-
07f0: 64 65 62 75 67 5c 73 31 5c 73 5d 7d 5c 73 73 45  debug\s1\s]}\ssE
0800: 72 72 4d 73 67 5d 7d 5c 73 7b 5c 72 5c 6e 5c 74  rrMsg]}\s{\r\n\t
0810: 70 75 74 73 5c 73 22 4e 6f 74 69 66 69 63 61 74  puts\s"Notificat
0820: 69 6f 6e 5c 73 66 61 69 6c 65 64 5c 73 2d 5c 73  ion\sfailed\s-\s
0830: 24 73 45 72 72 4d 73 67 22 5c 72 5c 6e 7d 5c 73  $sErrMsg"\r\n}\s
0840: 65 6c 73 65 5c 73 7b 5c 72 5c 6e 5c 73 5c 73 5c  else\s{\r\n\s\s\
0850: 73 5c 73 69 66 5c 73 7b 5c 73 24 73 45 6d 61 69  s\sif\s{\s$sEmai
0860: 6c 52 63 5c 73 21 3d 5c 73 5c 73 22 22 5c 73 7d  lRc\s!=\s\s""\s}
0870: 5c 73 7b 5c 72 5c 6e 5c 73 5c 73 5c 73 5c 73 5c  \s{\r\n\s\s\s\s\
0880: 73 5c 73 70 75 74 73 5c 73 22 4e 6f 74 69 66 69  s\sputs\s"Notifi
0890: 63 61 74 69 6f 6e 5c 73 66 61 69 6c 65 64 5c 73  cation\sfailed\s
08a0: 2d 5c 73 24 73 45 6d 61 69 6c 52 63 22 5c 72 5c  -\s$sEmailRc"\r\
08b0: 6e 5c 73 5c 73 5c 73 5c 73 7d 5c 73 65 6c 73 65  n\s\s\s\s}\selse
08c0: 5c 73 7b 5c 72 5c 6e 5c 73 5c 73 5c 73 5c 73 5c  \s{\r\n\s\s\s\s\
08d0: 73 5c 73 70 75 74 73 5c 73 22 4e 6f 74 69 66 69  s\sputs\s"Notifi
08e0: 63 61 74 69 6f 6e 5c 73 73 65 6e 74 5c 73 2d 5c  cation\ssent\s-\
08f0: 73 24 61 4d 61 69 6c 28 54 4f 29 22 5c 72 5c 6e  s$aMail(TO)"\r\n
0900: 5c 73 5c 73 5c 73 5c 73 7d 5c 72 5c 6e 7d 5c 72  \s\s\s\s}\r\n}\r
0910: 5c 6e 6d 69 6d 65 3a 3a 66 69 6e 61 6c 69 7a 65  \nmime::finalize
0920: 5c 73 24 6f 4d 61 69 6c 54 6f 6b 65 6e 5c 72 5c  \s$oMailToken\r\
0930: 6e 75 6e 73 65 74 5c 73 6f 4d 61 69 6c 54 6f 6b  nunset\soMailTok
0940: 65 6e 0a 4a 20 6c 6f 67 69 6e 20 61 6e 6f 6e 79  en.J login anony
0950: 6d 6f 75 73 0a 4a 20 6d 69 6d 65 74 79 70 65 20  mous.J mimetype 
0960: 74 65 78 74 2f 78 2d 6d 61 72 6b 64 6f 77 6e 0a  text/x-markdown.
0970: 4a 20 73 65 76 65 72 69 74 79 20 43 72 69 74 69  J severity Criti
0980: 63 61 6c 0a 4a 20 73 74 61 74 75 73 20 4f 70 65  cal.J status Ope
0990: 6e 0a 4a 20 74 69 74 6c 65 20 44 6f 65 73 5c 73  n.J title Does\s
09a0: 32 2e 30 62 32 5c 73 77 6f 72 6b 5c 73 77 69 74  2.0b2\swork\swit
09b0: 68 5c 73 4f 70 65 6e 53 53 4c 5c 73 33 2e 30 2e  h\sOpenSSL\s3.0.
09c0: 78 3f 0a 4a 20 74 79 70 65 20 43 6f 64 65 5c 73  x?.J type Code\s
09d0: 44 65 66 65 63 74 0a 4b 20 32 63 63 34 30 38 62  Defect.K 2cc408b
09e0: 64 33 36 38 36 39 32 33 39 61 32 62 62 66 65 64  d36869239a2bbfed
09f0: 38 39 30 38 61 66 33 37 66 33 38 61 38 62 39 35  8908af37f38a8b95
0a00: 63 0a 55 20 61 6e 6f 6e 79 6d 6f 75 73 0a 5a 20  c.U anonymous.Z 
0a10: 64 31 34 32 36 34 61 32 62 32 32 64 35 63 65 64  d14264a2b22d5ced
0a20: 30 30 39 33 66 65 39 66 33 34 34 63 32 38 31 61  0093fe9f344c281a
0a30: 0a                                               .