2000-07-22 19:03:03 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* */
|
|
|
|
|
/* cbm.h */
|
|
|
|
|
/* */
|
|
|
|
|
/* CBM system specific definitions */
|
|
|
|
|
/* */
|
|
|
|
|
/* */
|
|
|
|
|
/* */
|
2004-10-16 19:32:07 +00:00
|
|
|
|
/* (C) 1998-2004 Ullrich von Bassewitz */
|
|
|
|
|
/* R<>merstrasse 52 */
|
|
|
|
|
/* D-70794 Filderstadt */
|
|
|
|
|
/* EMail: uz@cc65.org */
|
2000-07-22 19:03:03 +00:00
|
|
|
|
/* */
|
|
|
|
|
/* */
|
|
|
|
|
/* This software is provided 'as-is', without any expressed or implied */
|
|
|
|
|
/* warranty. In no event will the authors be held liable for any damages */
|
|
|
|
|
/* arising from the use of this software. */
|
|
|
|
|
/* */
|
|
|
|
|
/* Permission is granted to anyone to use this software for any purpose, */
|
|
|
|
|
/* including commercial applications, and to alter it and redistribute it */
|
|
|
|
|
/* freely, subject to the following restrictions: */
|
|
|
|
|
/* */
|
|
|
|
|
/* 1. The origin of this software must not be misrepresented; you must not */
|
|
|
|
|
/* claim that you wrote the original software. If you use this software */
|
|
|
|
|
/* in a product, an acknowledgment in the product documentation would be */
|
|
|
|
|
/* appreciated but is not required. */
|
|
|
|
|
/* 2. Altered source versions must be plainly marked as such, and must not */
|
|
|
|
|
/* be misrepresented as being the original software. */
|
|
|
|
|
/* 3. This notice may not be removed or altered from any source */
|
|
|
|
|
/* distribution. */
|
|
|
|
|
/* */
|
|
|
|
|
/*****************************************************************************/
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#ifndef _CBM_H
|
|
|
|
|
#define _CBM_H
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2001-09-19 08:46:07 +00:00
|
|
|
|
/* Check for errors */
|
|
|
|
|
#if !defined(__CBM__)
|
|
|
|
|
# error This module may only be used when compiling for CBM machines!
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
|
/* Load the system specific files here, if needed */
|
2001-09-08 14:39:01 +00:00
|
|
|
|
#if defined(__C64__) && !defined(_C64_H)
|
|
|
|
|
# include <c64.h>
|
2002-08-07 05:18:13 +00:00
|
|
|
|
#elif defined(__VIC20__) && !defined(_VIC20_H)
|
|
|
|
|
# include <vic20.h>
|
2001-09-08 14:39:01 +00:00
|
|
|
|
#elif defined(__C128__) && !defined(_C128_H)
|
|
|
|
|
# include <c128.h>
|
|
|
|
|
#elif defined(__PLUS4__) && !defined(_PLUS4_H)
|
|
|
|
|
# include <plus4.h>
|
2002-11-21 21:22:26 +00:00
|
|
|
|
#elif defined(__C16__) && !defined(_C16_H)
|
|
|
|
|
# include <c16.h>
|
2001-09-13 21:27:32 +00:00
|
|
|
|
#elif defined(__CBM510__) && !defined(_CBM510_H)
|
|
|
|
|
# include <cbm510.h>
|
2001-09-08 14:39:01 +00:00
|
|
|
|
#elif defined(__CBM610__) && !defined(_CBM610_H)
|
|
|
|
|
# include <cbm610.h>
|
|
|
|
|
#elif defined(__PET__) && !defined(_PET_H)
|
|
|
|
|
# include <pet.h>
|
2000-05-28 13:40:48 +00:00
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2002-12-01 23:39:11 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* Variables */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* The file stream implementation and the POSIX I/O functions will use the
|
|
|
|
|
* following variables to determine the file type and the disk unit to use.
|
|
|
|
|
*/
|
|
|
|
|
extern unsigned char _curunit; /* Default 8 */
|
|
|
|
|
extern unsigned char _filetype; /* Default 'u' */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* Characters codes (CBM charset) */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
|
#define CH_HLINE 96
|
|
|
|
|
#define CH_VLINE 125
|
|
|
|
|
#define CH_ULCORNER 176
|
|
|
|
|
#define CH_URCORNER 174
|
|
|
|
|
#define CH_LLCORNER 173
|
|
|
|
|
#define CH_LRCORNER 189
|
|
|
|
|
#define CH_TTEE 178
|
|
|
|
|
#define CH_RTEE 179
|
|
|
|
|
#define CH_BTEE 177
|
|
|
|
|
#define CH_LTEE 171
|
|
|
|
|
#define CH_CROSS 123
|
|
|
|
|
#define CH_CURS_UP 145
|
|
|
|
|
#define CH_CURS_DOWN 17
|
|
|
|
|
#define CH_CURS_LEFT 157
|
|
|
|
|
#define CH_CURS_RIGHT 29
|
|
|
|
|
#define CH_PI 126
|
|
|
|
|
#define CH_DEL 20
|
|
|
|
|
#define CH_INS 148
|
2002-12-09 21:44:33 +00:00
|
|
|
|
#define CH_ENTER '\n'
|
2002-12-12 21:01:34 +00:00
|
|
|
|
#define CH_STOP 3
|
2002-12-14 16:55:17 +00:00
|
|
|
|
#define CH_ESC 27
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
2002-12-01 23:39:11 +00:00
|
|
|
|
|
|
|
|
|
|
2003-02-02 13:18:40 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* Definitions for directory reading functions */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* CBM FILE TYPES */
|
2009-09-28 22:01:58 +00:00
|
|
|
|
#define CBM_T_DEL 0
|
|
|
|
|
#define CBM_T_SEQ 1
|
|
|
|
|
#define CBM_T_PRG 2
|
|
|
|
|
#define CBM_T_USR 3
|
|
|
|
|
#define CBM_T_REL 4
|
|
|
|
|
#define CBM_T_CBM 5 /* 1581 sub-partition */
|
|
|
|
|
#define CBM_T_DIR 6 /* IDE64 and CMD sub-directory */
|
|
|
|
|
#define CBM_T_RESERVED 7 /* Not used, but kept free for compatibility */
|
|
|
|
|
#define CBM_T_VRP 8 /* Vorpal fast-loadable format */
|
|
|
|
|
#define CBM_T_OTHER 9 /* Other file-types not yet defined */
|
|
|
|
|
#define CBM_T_HEADER 10 /* Disk header / title */
|
2003-02-02 13:18:40 +00:00
|
|
|
|
|
|
|
|
|
/* CBM FILE ACCESS */
|
|
|
|
|
#define CBM_A_RO 1 /* Read only */
|
|
|
|
|
#define CBM_A_RW 3 /* Read, Write */
|
|
|
|
|
|
2004-10-16 19:32:07 +00:00
|
|
|
|
struct cbm_dirent {
|
2003-02-02 13:18:40 +00:00
|
|
|
|
char name[17]; /* File name in PETSCII, limited to 16 chars */
|
|
|
|
|
unsigned int size; /* Size in 256B blocks */
|
|
|
|
|
unsigned char type;
|
|
|
|
|
unsigned char access;
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2002-12-03 22:19:21 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* Machine info */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2004-10-16 19:32:07 +00:00
|
|
|
|
#define TV_NTSC 0
|
|
|
|
|
#define TV_PAL 1
|
|
|
|
|
#define TV_OTHER 2
|
2002-12-03 22:19:21 +00:00
|
|
|
|
|
|
|
|
|
unsigned char __fastcall__ get_tv (void);
|
2004-10-16 19:32:07 +00:00
|
|
|
|
/* Return the video mode the machine is using. */
|
2002-12-03 22:19:21 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2002-12-01 23:39:11 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* CBM kernal functions */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Constants to use with cbm_open() for opening a file for reading or
|
2001-10-10 20:35:07 +00:00
|
|
|
|
* writing without the need to append ",r" or ",w" to the filename.
|
|
|
|
|
*
|
|
|
|
|
* e.g.: cbm_open(2, 8, CBM_READ, "data,s");
|
|
|
|
|
*/
|
|
|
|
|
#define CBM_READ 0
|
|
|
|
|
#define CBM_WRITE 1
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
2001-03-13 22:48:19 +00:00
|
|
|
|
/* Kernel level functions */
|
|
|
|
|
void __fastcall__ cbm_k_setlfs (unsigned char LFN, unsigned char DEV,
|
|
|
|
|
unsigned char SA);
|
|
|
|
|
void __fastcall__ cbm_k_setnam (const char* Name);
|
2001-10-10 20:35:07 +00:00
|
|
|
|
unsigned int __fastcall__ cbm_k_load(unsigned char flag, unsigned addr);
|
2001-03-20 21:06:04 +00:00
|
|
|
|
unsigned char __fastcall__ cbm_k_save(unsigned int start, unsigned int end);
|
|
|
|
|
unsigned char __fastcall__ cbm_k_open (void);
|
|
|
|
|
void __fastcall__ cbm_k_close (unsigned char FN);
|
|
|
|
|
unsigned char __fastcall__ cbm_k_readst (void);
|
|
|
|
|
unsigned char __fastcall__ cbm_k_chkin (unsigned char FN);
|
2001-03-30 18:18:40 +00:00
|
|
|
|
unsigned char __fastcall__ cbm_k_ckout (unsigned char FN);
|
2001-03-20 21:06:04 +00:00
|
|
|
|
unsigned char __fastcall__ cbm_k_basin (void);
|
2001-03-30 18:18:40 +00:00
|
|
|
|
void __fastcall__ cbm_k_bsout (unsigned char C);
|
2001-03-20 21:06:04 +00:00
|
|
|
|
void __fastcall__ cbm_k_clrch (void);
|
2001-03-13 22:48:19 +00:00
|
|
|
|
|
2001-09-08 14:39:01 +00:00
|
|
|
|
|
|
|
|
|
|
2002-12-01 23:39:11 +00:00
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
/* BASIC-like file I/O functions */
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* All cbm_* IO functions set _oserror (see errno.h) in case of an
|
|
|
|
|
* error.
|
2001-03-30 18:18:40 +00:00
|
|
|
|
*
|
2002-12-01 23:39:11 +00:00
|
|
|
|
* errorcode BASIC error
|
|
|
|
|
* 1 = too many files
|
|
|
|
|
* 2 = file open
|
|
|
|
|
* 3 = file not open
|
|
|
|
|
* 4 = file not found
|
|
|
|
|
* 5 = device not present
|
|
|
|
|
* 6 = not input file
|
|
|
|
|
* 7 = not output file
|
|
|
|
|
* 8 = missing filename
|
|
|
|
|
* 9 = illegal device number
|
2001-03-30 18:18:40 +00:00
|
|
|
|
*/
|
2001-09-08 14:39:01 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2002-12-13 00:30:40 +00:00
|
|
|
|
unsigned int cbm_load (const char* name, unsigned char device, void* data);
|
2001-03-30 18:18:40 +00:00
|
|
|
|
/* Loads file "name" from given device to given address or to the load
|
2001-10-10 20:35:07 +00:00
|
|
|
|
* address of the file if "data" is the null pointer (like load"name",8,1
|
|
|
|
|
* in BASIC).
|
|
|
|
|
* Returns number of bytes that where loaded if loading was successful
|
|
|
|
|
* otherwise 0. "_oserror" contains an errorcode then (see table below).
|
2001-03-20 21:06:04 +00:00
|
|
|
|
*/
|
2001-03-13 22:48:19 +00:00
|
|
|
|
|
2002-11-15 18:42:06 +00:00
|
|
|
|
unsigned char cbm_save (const char* name, unsigned char device,
|
2002-12-13 00:30:40 +00:00
|
|
|
|
const void* data, unsigned int size);
|
2002-06-22 11:17:33 +00:00
|
|
|
|
/* Saves "size" bytes starting at "data" to a file.
|
2001-03-30 18:18:40 +00:00
|
|
|
|
* Returns 0 if saving was successful, otherwise an errorcode (see table
|
|
|
|
|
* below).
|
2001-03-20 21:06:04 +00:00
|
|
|
|
*/
|
|
|
|
|
|
2002-06-22 11:17:33 +00:00
|
|
|
|
unsigned char __fastcall__ cbm_open (unsigned char lfn,
|
|
|
|
|
unsigned char device,
|
|
|
|
|
unsigned char sec_addr,
|
|
|
|
|
const char* name);
|
2001-03-20 21:06:04 +00:00
|
|
|
|
/* Opens a file. Works just like the BASIC command.
|
2001-03-30 18:18:40 +00:00
|
|
|
|
* Returns 0 if opening was successful, otherwise an errorcode (see table
|
|
|
|
|
* below).
|
2001-03-20 21:06:04 +00:00
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
void __fastcall__ cbm_close (unsigned char lfn);
|
|
|
|
|
/* Closes a file */
|
|
|
|
|
|
2002-06-22 11:17:33 +00:00
|
|
|
|
int __fastcall__ cbm_read (unsigned char lfn, void* buffer, unsigned int size);
|
2001-03-21 20:59:27 +00:00
|
|
|
|
/* Reads up to "size" bytes from a file to "buffer".
|
2001-03-30 18:18:40 +00:00
|
|
|
|
* Returns the number of actually read bytes, 0 if there are no bytes left
|
|
|
|
|
* (EOF) or -1 in case of an error. _oserror contains an errorcode then (see
|
|
|
|
|
* table below).
|
|
|
|
|
*/
|
|
|
|
|
|
2002-11-15 18:42:06 +00:00
|
|
|
|
int __fastcall__ cbm_write (unsigned char lfn, void* buffer, unsigned int size);
|
2001-03-30 18:18:40 +00:00
|
|
|
|
/* Writes up to "size" bytes from "buffer" to a file.
|
|
|
|
|
* Returns the number of actually written bytes or -1 in case of an error.
|
2003-02-02 13:18:40 +00:00
|
|
|
|
* _oserror contains an errorcode then (see above table).
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
unsigned char __fastcall__ cbm_opendir (unsigned char lfn, unsigned char device);
|
|
|
|
|
/* Opens directory listing.
|
|
|
|
|
* Returns 0 if opening directory was successful,
|
|
|
|
|
* othervise errorcode corresponding to cbm_open()
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
unsigned char __fastcall__ cbm_readdir (unsigned char lfn, struct cbm_dirent* l_dirent);
|
|
|
|
|
/* Reads one directory line into cbm_dirent structure.
|
|
|
|
|
* Returns 0 if reading directory line was successful.
|
|
|
|
|
* Returns 'true' if reading directory failed or no more files to read.
|
2001-03-21 20:59:27 +00:00
|
|
|
|
*/
|
2002-11-21 21:22:26 +00:00
|
|
|
|
|
2003-02-02 13:18:40 +00:00
|
|
|
|
void __fastcall__ cbm_closedir (unsigned char lfn);
|
|
|
|
|
/* Closes directory by cbm_close (unsigned char lfn) */
|
2001-03-13 22:48:19 +00:00
|
|
|
|
|
2001-09-08 14:39:01 +00:00
|
|
|
|
|
|
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
|
/* End of cbm.h */
|
|
|
|
|
#endif
|
2001-09-08 14:39:01 +00:00
|
|
|
|
|
|
|
|
|
|