Context.hx 2.7 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798
  1. /*
  2. * Copyright (C)2005-2019 Haxe Foundation
  3. *
  4. * Permission is hereby granted, free of charge, to any person obtaining a
  5. * copy of this software and associated documentation files (the "Software"),
  6. * to deal in the Software without restriction, including without limitation
  7. * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  8. * and/or sell copies of the Software, and to permit persons to whom the
  9. * Software is furnished to do so, subject to the following conditions:
  10. *
  11. * The above copyright notice and this permission notice shall be included in
  12. * all copies or substantial portions of the Software.
  13. *
  14. * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15. * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16. * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  17. * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  18. * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  19. * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
  20. * DEALINGS IN THE SOFTWARE.
  21. */
  22. package sys.ssl;
  23. private typedef ConfigPtr = hl.Abstract<"mbedtls_ssl_config">;
  24. private typedef ContextPtr = hl.Abstract<"mbedtls_ssl_context">;
  25. @:keep class SNICbResult {
  26. public var cert:Certificate.CertificatePtr;
  27. public var key:Key.KeyPtr;
  28. public function new(cert:Certificate, key:Key) {
  29. this.cert = @:privateAccess cert.__x;
  30. this.key = @:privateAccess key.__k;
  31. }
  32. }
  33. @:hlNative("ssl", "ssl_")
  34. abstract Context(ContextPtr) {
  35. public function new(config) {
  36. this = ssl_new(config);
  37. }
  38. public function close():Void {}
  39. public function handshake():Int {
  40. return 0;
  41. }
  42. public function recvChar():Int {
  43. return 0;
  44. }
  45. public function sendChar(c:Int):Int {
  46. return 0;
  47. }
  48. public function getPeerCertificate():Certificate.CertificatePtr {
  49. return null;
  50. }
  51. public function recv(bytes:hl.Bytes, pos:Int, len:Int):Int {
  52. return 0;
  53. }
  54. public function send(bytes:hl.Bytes, pos:Int, len:Int):Int {
  55. return 0;
  56. }
  57. public function setSocket(socket:sys.net.Socket.SocketHandle):Void {}
  58. public function setHostname(name:hl.Bytes):Void {}
  59. @:hlNative("ssl", "ssl_new") static function ssl_new(conf:Config):ContextPtr {
  60. return null;
  61. }
  62. }
  63. @:hlNative("ssl", "conf_")
  64. abstract Config(ConfigPtr) {
  65. public function new(server:Bool) {
  66. this = conf_new(server);
  67. }
  68. public function setCert(cert:Certificate.CertificatePtr, pkey:Key.KeyPtr):Void {}
  69. public function setCa(ca:Certificate.CertificatePtr):Void {}
  70. public function close():Void {}
  71. public function setVerify(mode:Int):Void {}
  72. public function setServernameCallback(cb:hl.Bytes->SNICbResult):Void {}
  73. @:hlNative("ssl", "conf_new") static function conf_new(server:Bool):ConfigPtr {
  74. return null;
  75. }
  76. }