summaryrefslogtreecommitdiff
path: root/src/main/java/bjc/esodata/SingleTape.java
blob: 7c3a34fad84195c8f90de91b067e012f0b07a218 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
package bjc.esodata;

import java.util.ArrayList;

/**
 * A tape is a one-dimensional array that can only be accessed in one position
 * at a time.
 *
 * A tape is essentially a 1D array with a cursor attached to it, and you can
 * only affect elements at that cursor. The size of the array is theoretically
 * unbounded to the right, but in practice bounded by available memory.
 *
 * You can choose whether or not you want the tape to automatically extend
 * itself to the right with null elements by specifying its auto-extension
 * policy.
 *
 * @param <T>
 *            The element type of the tape.
 *
 * @author bjculkin
 */
public class SingleTape<T> implements Tape<T> {
	/**
	 * Our backing store.
	 */
	protected ArrayList<T> backing;
	/**
	 * Our position in the list.
	 */
	protected int pos;
	/**
	 * Whether to auto-extend the list on the left with nulls.
	 */
	protected boolean autoExtend;

	/**
	 * Create a new tape with the specified contents that doesn't auto-extend.
	 *
	 * @param vals
	 *             The values to put on the tape.
	 */
	@SafeVarargs
	public SingleTape(T... vals) {
		autoExtend = false;

		backing = new ArrayList<>(vals.length);

		for (T val : vals) backing.add(val);
	}

	/**
	 * Create a new empty tape that doesn't auto-extend.
	 */
	public SingleTape() {
		this(false);
	}

	/**
	 * Create a new tape with values taken from an iterable.
	 *
	 * @param itr
	 *            The iterable to get values from.
	 */
	public SingleTape(Iterable<T> itr) {
		this(false);

		for (T itm : itr) backing.add(itm);
	}

	/**
	 * Create a new empty tape that follows the specified auto-extension policy.
	 *
	 * @param autoExtnd
	 *                  Whether or not to auto-extend the tape to the right w/
	 *                  nulls.
	 */
	public SingleTape(final boolean autoExtnd) {
		autoExtend = autoExtnd;

		backing = new ArrayList<>();
	}

	@Override
	public T item() {
		if (pos < 0 || pos >= backing.size()) return null;

		return backing.get(pos);
	}

	@Override
	public void item(final T itm) {
		backing.set(pos, itm);
	}

	@Override
	public int size() {
		return backing.size();
	}

	@Override
	public int position() {
		return pos;
	}

	@Override
	public void insertBefore(final T itm) {
		backing.add(pos, itm);
	}

	@Override
	public void insertAfter(final T itm) {
		if (pos == backing.size() - 1) backing.add(itm);
		else                           backing.add(pos + 1, itm);
	}

	@Override
	public T remove() {
		final T res = backing.remove(pos);

		if (pos != 0) pos -= 1;
		
		return res;
	}

	@Override
	public void first() {
		pos = 0;
	}

	@Override
	public void last() {
		pos = backing.size() - 1;
	}

	@Override
	public boolean left() {
		return left(1);
	}

	@Override
	public boolean left(final int amt) {
		if (pos - amt < 0) return false;

		pos -= amt;
		return true;
	}

	@Override
	public boolean right() {
		return right(1);
	}

	@Override
	public boolean right(final int amt) {
		if (pos + amt > backing.size()) {
			if (autoExtend) {
				while (pos + amt >= backing.size() - 1) backing.add(null);
			} else {
				return false;
			}
		}

		pos += amt;
		return true;
	}

	@Override
	public boolean seekTo(int tgtPos) {
		if (tgtPos < 0) return false;

		if (tgtPos >= backing.size() - 1) {
			if (autoExtend) {
				while (tgtPos >= backing.size() - 1) backing.add(null);
			} else {
				return false;
			}
		}

		pos = tgtPos;

		return true;
	}

	@Override
	public void append(T itm) {
		backing.add(itm);
	}

	@Override
	public int hashCode() {
		final int prime = 31;

		int result = 1;
		result = prime * result + (backing == null ? 0 : backing.hashCode());

		return result;
	}

	@Override
	public boolean equals(final Object obj) {
		if (this == obj)                     return true;
		if (obj == null)                     return false;
		if (!(obj instanceof SingleTape<?>)) return false;

		final SingleTape<?> other = (SingleTape<?>) obj;

		if (backing == null) {
			if (other.backing != null) return false;
		} else if (!backing.equals(other.backing)) {
			return false;
		}

		return true;
	}

	@Override
	public String toString() {
		return String.format("SingleTape [backing=%s, pos=%s, autoExtend=%s]", backing,
				pos, autoExtend);
	}
}