FileOutput.hx 2.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172
  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.io;
  23. @:haxe.warning("-WUnboundMonomorph")
  24. @:coreApi class FileOutput extends haxe.io.Output {
  25. private var __f:File.FileHandle;
  26. function new(f:File.FileHandle):Void {
  27. __f = f;
  28. }
  29. public override function writeByte(c:Int):Void {
  30. try
  31. file_write_char(__f, c)
  32. catch (e:Dynamic)
  33. throw haxe.io.Error.Custom(e);
  34. }
  35. public override function writeBytes(s:haxe.io.Bytes, p:Int, l:Int):Int {
  36. return try file_write(__f, s.getData(), p, l) catch (e:Dynamic) throw haxe.io.Error.Custom(e);
  37. }
  38. public override function flush():Void {
  39. file_flush(__f);
  40. }
  41. public override function close():Void {
  42. super.close();
  43. file_close(__f);
  44. }
  45. public function seek(p:Int, pos:FileSeek):Void {
  46. file_seek(__f, p, switch (pos) {
  47. case SeekBegin: 0;
  48. case SeekCur: 1;
  49. case SeekEnd: 2;
  50. });
  51. }
  52. public function tell():Int {
  53. return file_tell(__f);
  54. }
  55. private static var file_close = neko.Lib.load("std", "file_close", 1);
  56. private static var file_seek = neko.Lib.load("std", "file_seek", 3);
  57. private static var file_tell = neko.Lib.load("std", "file_tell", 1);
  58. private static var file_flush = neko.Lib.load("std", "file_flush", 1);
  59. private static var file_write = neko.Lib.load("std", "file_write", 4);
  60. private static var file_write_char = neko.Lib.load("std", "file_write_char", 2);
  61. }