1 /* 2 * CustomTextualInputPort.h - 3 * 4 * Copyright (c) 2009 Higepon(Taro Minowa) <higepon@users.sourceforge.jp> 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 18 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 19 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 20 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 21 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 22 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED 23 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR 24 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF 25 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING 26 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS 27 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 28 * 29 * $Id: CustomTextualInputPort.h 261 2008-07-25 06:16:44Z higepon $ 30 */ 31 32 #ifndef SCHEME_CUSTOM_TEXTUAL_INPUT_PORT_ 33 #define SCHEME_CUSTOM_TEXTUAL_INPUT_PORT_ 34 35 #include "TextualInputPort.h" 36 37 namespace scheme { 38 39 class CustomTextualInputPort : public TextualInputPort 40 { 41 public: 42 CustomTextualInputPort(VM* theVM, const ucs4string& id, Object readProc, Object getPositionProc, Object setPositionProc, Object closeProc); 43 virtual ~CustomTextualInputPort(); 44 45 ucs4char getChar(); 46 int getLineNo() const; 47 void unGetChar(ucs4char c); 48 Transcoder* transcoder() const; 49 bool hasPosition() const; 50 bool hasSetPosition() const; 51 Object position() const; 52 bool setPosition(int64_t position); 53 54 // Port interface 55 ucs4string toString(); 56 int close(); 57 bool isClosed() const; 58 private: 59 VM* theVM_; 60 const ucs4string id_; 61 const Object readProc_; 62 const Object getPositionProc_; 63 const Object setPositionProc_; 64 const Object closeProc_; 65 ucs4string buffer_; 66 int line_; 67 bool isClosed_; 68 }; 69 70 } // namespace scheme 71 72 #endif // SCHEME_CUSTOM_TEXTUAL_INPUT_PORT_ 73