/* * AppleCommander - An Apple ][ image utility. * Copyright (C) 2002 by Robert Greene * robgreene at users.sourceforge.net * * This program is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License as published by the * Free Software Foundation; either version 2 of the License, or (at your * option) any later version. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * for more details. * * You should have received a copy of the GNU General Public License along * with this program; if not, write to the Free Software Foundation, Inc., * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ package com.webcodepro.applecommander.storage; import java.io.ByteArrayOutputStream; import java.io.PrintWriter; /** * Filter the given file as an Applesoft file. *
* Applesoft memory format:
* Date created: Nov 2, 2002 10:04:10 PM
* @author: Rob Greene
*/
public class ApplesoftFileFilter implements FileFilter {
private static String tokens[] = { // starts at $80
" END ", " FOR ", " NEXT ", " DATA ", " INPUT ", " DEL ",
" DIM ", " READ ", " GR ", " TEXT ", " PR# ", " IN# ",
" CALL ", " PLOT ", " HLIN ", " VLIN ", " HGR2 ", " HGR ",
" HCOLOR= ", " HPLOT ", " DRAW ", " XDRAW ", " HTAB ", " HOME ",
" ROT= ", " SCALE= ", " SHLOAD ", " TRACE ", " NOTRACE ", " NORMAL ",
" INVERSE ", " FLASH ", " COLOR= ", " POP ", " VTAB ", " HIMEM: ",
" LOMEM: ", " ONERR ", " RESUME ", " RECALL ", " STORE ", " SPEED= ",
" LET ", " GOTO ", " RUN ", " IF ", " RESTORE ", " & ",
" GOSUB ", " RETURN ", " REM ", " STOP ", " ON ", " WAIT ",
" LOAD ", " SAVE ", " DEF ", " POKE ", " PRINT ", " CONT ",
" LIST ", " CLEAR ", " GET ", " NEW ", " TAB( ", " TO ",
" FN ", " SPC( ", " THEN ", " AT ", " NOT ", " STEP ",
" +", " -", " *", "/", " ^", " AND ",
" OR ", " >", " =", " <", " SGN", " INT",
" ABS", " USR", " FRE", " SCRN( ", " PDL", " POS",
" SQR", " RND", " LOG", " EXP", " COS", " SIN",
" TAN", " ATN", " PEEK", " LEN", " STR$", " VAL",
" ASC", " CHR$", " LEFT$", " RIGHT$", " MID$ " };
/**
* Constructor for ApplesoftFileFilter.
*/
public ApplesoftFileFilter() {
super();
}
/**
* Process the given FileEntry and return a text image of the Applesoft file.
* @see com.webcodepro.applecommander.storage.FileFilter#filter(FileEntry)
*/
public byte[] filter(FileEntry fileEntry) {
byte[] fileData = fileEntry.getFileData();
int offset = 0;
ByteArrayOutputStream byteArray = new ByteArrayOutputStream(fileData.length * 2);
PrintWriter printWriter = new PrintWriter(byteArray, true);
while (offset < fileData.length) {
int nextAddress = AppleUtil.getWordValue(fileData, offset);
if (nextAddress == 0) break; // next address of 0 indicates end of program
offset+= 2;
int lineNumber = AppleUtil.getWordValue(fileData, offset);
offset+= 2;
printWriter.print(lineNumber);
printWriter.print(' ');
while (fileData[offset] != 0) {
byte byt = fileData[offset++];
if ((byt & 0x80) != 0) {
int token = AppleUtil.getUnsignedByte(byt) - 0x80;
if (token >= tokens.length) {
printWriter.print("
* [Line]
* ...
* [Line]
*
* where
* [Next addr - $0000 is end of program] (word)
* [Line no] (word)
* [Tokens and/or characters]
* [End-of-line marker: $00 bytes]
*