From ba700f0759a59551159e90aff2bd6d547c27179b Mon Sep 17 00:00:00 2001 From: Harley Travis Date: Sat, 23 May 2026 23:55:17 -0500 Subject: TOSFloppy_2025-04-20T2103-0500.zip This was the second and final Discord release of the TempleOS floppy disk controller driver, released April 20, 2025. This release saw mainly structure changes, plus the addition of a license file (the code, at this point, is licensed under Do What The Fuck You Want To Public License, version 2.0). --- KernelC.HH | 787 ------------------------------------------------------------- 1 file changed, 787 deletions(-) delete mode 100644 KernelC.HH (limited to 'KernelC.HH') diff --git a/KernelC.HH b/KernelC.HH deleted file mode 100644 index ffa7c8b..0000000 --- a/KernelC.HH +++ /dev/null @@ -1,787 +0,0 @@ -#help_index "AutoComplete" -#help_file "::/Doc/AutoComplete" -public extern CAutoCompleteGlbls ac; - -#help_index "AutoComplete/Dictionary" -public extern CAutoCompleteDictGlbls acd; - -#help_index "Bit" -public extern I64 BCnt(I64 d); -public extern U8 *rev_bits_table,*set_bits_table; - -#help_index "Boot" -#help_file "::/Doc/Boot" -public extern U0 Reboot(); - -#help_index "Call" -public argpop extern I64 CallStkGrow(I64 stk_size_threshold,I64 stk_size, - /*argpop*/I64 (*fp_addr)(...),...); -//fp_addr can have any fixed number of arguments. - -#help_index "Call/FarCall32" -public _extern _FAR_CALL32 Bool FarCall32(U0 (*fp_addr)());//Not reentrant -public _extern C32_EAX U32 c32_eax; -public _extern C32_EBX U32 c32_ebx; -public _extern C32_ECX U32 c32_ecx; -public _extern C32_EDI U32 c32_edi; -public _extern C32_EDX U32 c32_edx; -public _extern C32_EFLAGS U32 c32_eflags; -public _extern C32_ESI U32 c32_esi; - -#help_index "Char/BitMaps" -public extern U32 char_bmp_alpha[16],char_bmp_alpha_numeric[16], -char_bmp_alpha_numeric_no_at[16], char_bmp_word[16], -char_bmp_dec_numeric[16], char_bmp_hex_numeric[16], -char_bmp_white_space[16], char_bmp_non_eol_white_space[16], -char_bmp_zero_cr_nl_cursor[16], char_bmp_zero_tab_cr_nl_cursor[16], -char_bmp_zero_tab_cr_nl_cursor_dollar[16], -char_bmp_macro[16], char_bmp_printable[16], -char_bmp_displayable[16], char_bmp_safe_dollar[16], -char_bmp_filename[16], char_bmp_non_eol[16]; - -#help_index "Char/Conversion" -public extern U8 *Char2KeyName(I64 ch,Bool include_ctrl=TRUE); -public extern I64 Char2ScanCode(I64 ch,I64 sc_flags=0); -public extern U8 ScanCode2Char(I64 sc); -public extern U8 *ScanCode2KeyName(I64 sc); -public extern F64 Str2F64(U8 *src,U8 **_end_ptr=NULL); -public extern I64 Str2I64(U8 *st,I64 radix=10,U8 **_end_ptr=NULL); -public extern U8 *StrScan(U8 *src,U8 *fmt,...); - -#help_index "Char/Conversion;Time/Date/CDate;Date/CDate" -public extern CDate Str2Date(U8 *src); - -#help_index "Char/Flags" -public extern U0 ScanFlags(U8 *_dst_flags,U8 *lst,U8 *src); -public extern U8 *StrPrintFlags(U8 *dst,U8 *lst,I64 flags); - -#help_index "Char/Lists" -public extern I64 LstMatch(U8 *needle, U8 *haystack_lst,I64 flags=0); -public extern U8 *LstSub(I64 sub, U8 *lst); - -#help_index "Char/Operations" -public extern U8 *MStrPrint(U8 *fmt,...); -public extern U8 *MStrUtil(U8 *src,I64 flags,F64 indent_scale_factor=0); -public extern U8 *ScaleIndent(U8 *src,F64 indent_scale_factor); -public extern I64 Spaces2Tabs(U8 *dst,U8 *src); -public _extern _STRCMP I64 StrCmp(U8 *st1,U8 *st2); -public _extern _STRCPY U0 StrCpy(U8 *dst,U8 *src); -public extern U8 *StrFind(U8 *needle,U8 *haystack_str,I64 flags=0); -public extern U8 *StrFirstOcc(U8 *src,U8 *marker); -public extern U8 *StrFirstRem(U8 *src,U8 *marker,U8 *dst=NULL); -public _extern _STRICMP I64 StrICmp(U8 *st1,U8 *st2); -public _extern _STRIMATCH U8 *StrIMatch(U8 *needle,U8 *haystack_str); -public extern U8 *StrLastOcc(U8 *src,U8 *marker); -public extern U8 *StrLastRem(U8 *src,U8 *marker,U8 *dst=NULL); -public _extern _STRMATCH U8 *StrMatch(U8 *needle,U8 *haystack_str); -public _extern _STRNCMP I64 StrNCmp(U8 *st1,U8 *st2,I64 n); -public _extern _STRNICMP I64 StrNICmp(U8 *st1,U8 *st2,I64 n); -public extern I64 StrOcc(U8 *src, U8 ch); -public extern U8 *StrPrint(U8 *dst,U8 *fmt,...); -public extern U8 *StrPrintJoin(U8 *dst,U8 *fmt,I64 argc,I64 *argv); -public extern U8 *StrUtil(U8 *_src,I64 flags); -public extern U8 *Tabs2Spaces(U8 *src); -public extern Bool WildMatch(U8 *test_str,U8 *wild_str); - -#help_index "Char/Operations;Memory" -public extern U8 *CatPrint(U8 *dst,U8 *fmt,...); - -#help_index "Char/Operations;Memory/Adam Heap" -public extern U8 *AStrNew(U8 *buf); - -#help_index "Char/Operations;Memory/Heap" -public extern U8 *StrNew(U8 *buf,CTask *mem_task=NULL); - -#help_index "Char/Output;StdOut" -public extern U0 GetOutOfDollar(); -public extern Bool IsSilent(); -public extern U0 Print(U8 *fmt,...); -public extern U0 PrintErr(U8 *fmt,...); -public extern U0 PrintWarn(U8 *fmt,...); -public extern U0 PutChars(U64 ch); -extern U0 PutHex(I64 num,I64 width); -public extern U0 PutKey(I64 ch=0,I64 sc=0); -extern U0 PutS(U8 *st); //Use $LK,"Print",A="MN:Print"$() -public extern Bool Silent(Bool val=ON); -extern U8 *StrPrintHex(U8 *dst,I64 num;I64 width); - -#help_index "Char;Debugging/Raw Output;TextBase Layer/Char" -public extern CTextGlbls text; - -#help_index "Compiler/Lex" -public extern U0 HashSrcFileSet(CCmpCtrl *cc, - CHashSrcSym *h,I64 line_num_offset=0); - -#help_index "Compiler;Cmd Line (Typically)" -extern U8 *Load(U8 *filename,I64 ld_flags=0, - CBinFile *bfh_addr=INVALID_PTR); //INVALID_PTR=don't care what load addr - -#help_index "Compression" -public extern CArcCompress *CompressBuf(U8 *src,I64 size,CTask *mem_task=NULL); -public extern U8 *ExpandBuf(CArcCompress *arc,CTask *mem_task=NULL); - -#help_index "Compression/Piece by Piece" -public extern U0 ArcCompressBuf(CArcCtrl *c); -public extern U0 ArcCtrlDel(CArcCtrl *c); -public extern CArcCtrl *ArcCtrlNew(Bool expand,I64 compression_type=CT_8_BIT); -public extern U0 ArcExpandBuf(CArcCtrl *c); -public extern Bool ArcFinishCompression(CArcCtrl *c); - -#help_index "Data Types/Circular Queue" -public extern I64 QueCnt(CQue *head); -public extern CQue *QueCopy(CQue *head,CTask *mem_task=NULL); -public extern U0 QueDel(CQue *head,Bool querem=FALSE); -public extern I64 QueSize(CQue *head); - -#help_index "Data Types/Fifo" -public extern I64 FifoI64Cnt(CFifoI64 *f); -public extern U0 FifoI64Del(CFifoI64 *f); -public extern U0 FifoI64Flush(CFifoI64 *f); -public extern Bool FifoI64Ins(CFifoI64 *f,I64 q); -public extern CFifoI64 *FifoI64New(I64 size,CTask *mem_task=NULL); -public extern Bool FifoI64Peek(CFifoI64 *f,I64 *_q); -public extern Bool FifoI64Rem(CFifoI64 *f,I64 *_q); -public extern I64 FifoU8Cnt(CFifoU8 *f); -public extern U0 FifoU8Del(CFifoU8 *f); -public extern U0 FifoU8Flush(CFifoU8 *f); -public extern Bool FifoU8Ins(CFifoU8 *f,U8 b); -public extern CFifoU8 *FifoU8New(I64 size,CTask *mem_task=NULL); -public extern Bool FifoU8Peek(CFifoU8 *f,U8 *_b); -public extern Bool FifoU8Rem(CFifoU8 *f,U8 *_b); - -#help_index "Data Types/Linked List" -public extern I64 LinkedLstCnt(U8 **_lst); -public extern U8 *LinkedLstCopy(U8 **_lst,CTask *mem_task=NULL); -public extern U0 LinkedLstDel(U8 **_lst); -public extern I64 LinkedLstSize(U8 **_lst); - -#help_index "Data Types/Queue Vector" -public extern U0 QueVectU8Del(CQueVectU8 *v); -public extern I64 QueVectU8Get(CQueVectU8 *v,I64 idx); -public extern CQueVectU8 *QueVectU8New(I64 min_idx=0); -public extern U0 QueVectU8Put(CQueVectU8 *v,I64 idx,U8 ch); - -#help_index "Debugging" -public extern U8 *Caller(I64 num=1); -public extern Bool ChkCodePtr(U8 *ptr); -public extern Bool ChkOnStk(U8 *ptr,CTask *task=NULL); -public extern Bool ChkPtr(U8 *ptr); -public extern Bool IsSingleUser(); -public extern Bool IsSysDbg(); -public extern Bool SingleUser(Bool val); -public extern Bool SysDbg(Bool val); -public extern U8 *TaskCaller(CTask *task=NULL, - I64 num=0,Bool saved_context=FALSE); -public extern I64 UnusedStk(CTask *task=NULL); -public extern CDbgGlbls dbg; - -#help_index "Debugging/Debugger" -public extern Bool B(U8 *addr,CTask *task=NULL,Bool live=TRUE) //Toggle bpt. -public extern I64 B2(CTask *task=NULL,Bool live=TRUE); -extern CBpt *BptFind(U8 *needle_addr,CTask *haystack_task=NULL,Bool rem=FALSE); -public extern Bool BptR(U8 *addr,CTask *task=NULL,Bool live=TRUE,Bool rem=TRUE); -public extern Bool BptS(U8 *addr,CTask *task=NULL,Bool live=TRUE); -public extern Bool DbgMode(Bool val); -public extern Bool E(U8 *addr,I64 cnt=512,I64 edf_dof_flags=0); -public extern Bool EdLite(U8 *filename,I64 num=1,I64 edf_dof_flags=0); -extern Bool EdLiteFileLine(U8 *fl_file_line,I64 edf_dof_flags=0); -public extern Bool Fix(I64 edf_dof_flags=0); -public extern U0 FixSet(U8 *filename,I64 line); -public extern U0 G(U8 *ms=INVALID_PTR,CTask *task=NULL); -public extern U0 G2(U8 *ms=INVALID_PTR,CTask *task=NULL); -public extern Bool IsDbgMode(); -public extern U0 S(U8 *ms=INVALID_PTR,CTask *task=NULL); - -#help_index "Debugging/Debugger;DolDoc/Cmd Line (Typically);"\ - "Cmd Line (Typically);Help System" -public extern Bool Man(U8 *st,I64 edf_dof_flags=0); - -#help_index "Debugging/Dump" -public extern U0 CallerRep(U8 **rbp=NULL,CTask *task=NULL); -public extern U0 D(U8 *addr,I64 cnt=0x80,Bool show_offset=TRUE); -public extern U0 Da(U8 **addr,I64 cnt=0x10); -public extern U0 Dm(U8 *addr,I64 cnt=0x80); -public extern U0 Dr(CTask *task=NULL); -public extern U0 StkRep(CTask *task=NULL); -extern I64 *TaskRegAddr(CTask *task,I64 reg_num); - -#help_index "Debugging/FunSeg" -#help_file "::/Doc/DbgFunSeg" -public extern Bool PutSrcLink(U8 *addr,I64 cnt=1,U8 *buf=NULL); -public extern U8 *SrcEdLink(U8 *addr,I64 cnt=1,CTask *mem_task=NULL); -public extern U8 *SrcFileName(U8 *addr,I64 cnt=1,CTask *mem_task=NULL); -public extern I64 SrcLineNum(U8 *addr,I64 cnt=1); - -#help_index "Debugging/FunSeg;Hash/System" -public extern CHash *FunSegFind(U8 *addr,I64 *_offset); - -#help_index "Debugging/Raw Output" -public extern Bool IsRaw(); -public extern Bool Raw(Bool val); -public extern U0 RawD(I64 mS=100,U8 *addr,I64 cnt=0x80); -public extern U0 RawDm(I64 mS=100,U8 *addr,I64 cnt=0x80); -extern U0 RawDr(CTask *task=NULL); -public extern U0 RawPrint(I64 mS=100,U8 *fmt,...); -public extern U0 RawPutChar(I64 ch); -public extern U0 VGAFlush(); - -#help_index "Debugging;Debugging/Debugger" -public extern U0 Dbg(U8 *msg=NULL,I64 msg_num=0); -public extern U0 Panic(U8 *msg=NULL,I64 msg_num=0,Bool panic=TRUE); - -#help_index "Define;Char/Define" -#help_file "::/Doc/Define" -public extern U8 *Define(U8 *dname); -public extern CHashDefineStr *DefineLoad(U8 *dname,U8 *st); -public extern U0 DefinePrint(U8 *dname,U8 *src,...); - -#help_index "Define;Char/Define;Char/Lists" -public extern I64 DefineCnt(U8 *dname); -public extern CHashDefineStr *DefineLstLoad(U8 *dname,U8 *lst); -public extern I64 DefineMatch(U8 *needle,U8 *haystack_lst_dname,I64 flags=0); -public extern U8 *DefineSub(I64 sub,U8 *dname); - -#help_index "Devices;Memory/Page Tables" -public extern U8 *Mem32DevAlloc(I64 size,I64 alignment); -public extern U0 Mem32DevFree(U8 *base); -public extern U8 *Mem64DevAlloc(I64 *_pages1Gig); -public extern U0 Mem64DevFree(U8 *base,I64 pages1Gig); -public extern CDevGlbls dev; - -#help_index "DolDoc/Clip" -public extern CDoc *sys_clip_doc; - -#help_index "DolDoc/Task;StdOut/Task" -#help_file "::/Doc/StdOutTask" -extern CDoc *(*fp_doc_put)(CTask *task=NULL); - -#help_index "Exceptions" -public extern U0 Break(); -public extern Bool BreakLock(CTask *task=NULL); -public extern Bool BreakUnlock(CTask *task=NULL); -public extern U0 PutExcept(Bool catch_it=TRUE); -extern U0 SysTry(U8 *start_label,U8 *skip_label); -extern U0 SysUntry(); -public extern U0 throw(I64 ch=0,Bool no_log=FALSE); - -#help_index "File/CD DVD" -public extern U0 DVDImageRead(U8 dvd_drv_let,U8 *out_name); -public extern U0 DVDImageWrite(U8 dvd_drv_let, - U8 *in_name=NULL,I64 media_type=MT_DVD); - -#help_index "File/CFile" -public extern Bool FBlkRead(CFile *f,U8 *buf,I64 blk=FFB_NEXT_BLK,I64 cnt=1); -public extern Bool FBlkWrite(CFile *f,U8 *buf,I64 blk=FFB_NEXT_BLK,I64 cnt=1); -public extern U0 FClose(CFile *f); -public extern CFile *FOpen(U8 *filename,U8 *flags,I64 cnt=0); -public extern I64 FSize(CFile *f); - -#help_index "File/Cmd Line (Typically);Cmd Line (Typically)" -public extern Bool Cd(U8 *dirname=NULL,Bool make_dirs=FALSE); -public extern I64 Del(U8 *files_find_mask,Bool make_mask=FALSE, - Bool del_dir=FALSE,Bool print_msg=TRUE); -public extern I64 Dir(U8 *files_find_mask="*",Bool full=FALSE); -public extern Bool DirMk(U8 *filename,I64 entry_cnt=0); -public extern Bool Drv(U8 drv_let); -public extern U0 DskChg(U8 drv_let=0); -public extern U0 HomeSet(U8 *dirname); - -#help_index "File/Cmd Line (Typically);Cmd Line (Typically);Install" -public extern Bool DrvMap(U8 drv_let,CDrv *dv); - -#help_index "File/FileNames" -extern CDirEntry *Cd2DirEntry(CDirEntry *tmpde,U8 *abs_name); -public extern U8 *DirCur(CTask *task=NULL,CTask *mem_task=NULL); -public extern U8 *DirFile(U8 *dirname,U8 *name=NULL,U8 *_extension=NULL); -public extern U8 *DirNameAbs(U8 *dirname); -public extern CBlkDev *DrvIsWritable(U8 drv_let=0,Bool except=FALSE); -public extern U8 *ExtChg(U8 *filename,U8 *extension); -public extern U8 *ExtDft(U8 *filename,U8 *extension); -public extern U8 *FileExtDot(U8 *src); -public extern U8 *FileExtRem(U8 *src,U8 *dst=NULL); -public extern U8 *FileNameAbs(U8 *filename,I64 fuf_flags=0); -public extern Bool FileNameChk(U8 *filename); -public extern Bool FilesFindMatch(U8 *_test_name, - U8 *files_find_mask,I64 fuf_flags=0); -public extern Bool IsDir(U8 *dir_name); -public extern Bool IsDotC(U8 *filename); -public extern Bool IsDotZ(U8 *filename); -public extern U0 PutDirLink(U8 *dirname,U8 *full_name=NULL); -public extern U0 PutFileLink(U8 *filename,U8 *full_name=NULL, - I64 line=0,Bool plain_text=FALSE); -public extern U0 ToFileLine(U8 *_fl_file_line,U8 **_filename,I64 *_linenum); -public extern U8 *ToggleZorNotZ(U8 *name); - -#help_index "File/FileNames;Misc" -public extern U8 *FileNameTmpTxt(); - -#help_index "File/Internal" -public extern U0 DirContextDel(CDirContext *dirc,Bool restore=TRUE); -public extern CDirContext *DirContextNew(U8 *mask, - Bool make_mask=FALSE,Bool make_dirs=FALSE,Bool no_mask=FALSE); -public extern Bool DirNew(CDrv *dv,U8 *cur_dir, - CDirEntry *tmpde,Bool free_old_chain=TRUE); -extern I64 FileAttr(U8 *name,I64 old_attr=0); - -#help_index "File/Low Level" -#help_file "::/Doc/FileLowLevel" -public extern CBlkDev *BlkDevChk(CBlkDev *bd,Bool except=TRUE); -public extern U0 BlkDevDel(CBlkDev *bd); -public extern Bool BlkDevLock(CBlkDev *bd); -public extern CBlkDev *BlkDevNextFreeSlot(U8 first_drv_let,I64 type); -public extern Bool BlkDevUnlock(CBlkDev *bd,Bool rst=FALSE); -public extern U0 BlkDevsRelease(); -public extern Bool BlkRead(CDrv *dv,U8 *buf, I64 blk, I64 cnt); -public extern Bool BlkWrite(CDrv *dv,U8 *buf, I64 blk, I64 cnt); -public extern U0 BlkWriteZero(CDrv *dv,I64 blk,I64 cnt); -public extern I64 Clus2Blk(CDrv *dv,I64 c); -public extern I64 ClusAlloc(CDrv *dv,I64 c=0, - I64 cnt=1,Bool contiguous=FALSE); -public extern I64 ClusBlkRead(CDrv *dv,U8 *buf,I64 c,I64 blks); -public extern I64 ClusBlkWrite(CDrv *dv,U8 *buf,I64 c,I64 blks); -public extern I64 ClusNumNext(CDrv *dv,I64 c,I64 cnt=1); -public extern I64 ClusRead(CDrv *dv,U8 *buf,I64 c,I64 cnt); -public extern I64 ClusWrite(CDrv *dv,U8 *buf,I64 c,I64 cnt); -extern Bool CopySingle(U8 *f1,U8 *f2); //Just one file -public extern U8 Drv2Let(CDrv *dv=NULL); -public extern CDrv *DrvChk(CDrv *dv,Bool except=TRUE); -public extern U0 DrvDel(CDrv *dv); -public extern Bool DrvLock(CDrv *dv); -public extern CDrv *DrvMakeFreeSlot(U8 drv_let); -public extern U8 *DrvModelNum(U8 drv_let=0); -public extern U8 DrvNextFreeLet(U8 first_drv_let='C'); -public extern U8 *DrvSerialNum(U8 drv_let=0); -public extern U8 DrvTextAttrGet(U8 drv_let=0); -public extern Bool DrvUnlock(CDrv *dv,Bool rst=FALSE); -public extern U0 DrvsRelease(); -extern U0 FAT32FreeClus(CDrv *dv,I64 c); -public extern CBlkDev *Let2BlkDev(U8 drv_let=0,Bool except=TRUE); -public extern I64 Let2BlkDevType(U8 drv_let); -public extern CDrv *Let2Drv(U8 drv_let=0,Bool except=TRUE); -public extern U8 Let2Let(U8 drv_let=0); -extern I64 Name2DirClus(CDrv *dv,U8 *dirname); -extern I64 Name2ParentDirClus(CDrv *dv,U8 *dirname); -extern U0 RedSeaFreeClus(CDrv *dv,I64 c,I64 cnt); - -#help_index "File/Program Routines" -public extern U0 DirEntryDel(CDirEntry *tmpde); -public extern U0 DirEntryDel2(CDirEntry *tmpde); -public extern U0 DirTreeDel(CDirEntry *tmpde); -public extern U0 DirTreeDel2(CDirEntry *tmpde); -public extern Bool FileFind(U8 *filename,CDirEntry *_de=NULL,I64 fuf_flags=0); -public extern U8 *FileRead(U8 *filename,I64 *_size=NULL,I64 *_attr=NULL); -public extern I64 FileWrite(U8 *filename, - U8 *fbuf,I64 size,CDate cdt=0,I64 attr=0); - -#help_index "File/Program Routines;File/FileNames" -public extern CDirEntry *FilesFind(U8 *files_find_mask,I64 fuf_flags=0); - -#help_index "File/System" -public extern CATARep *ATAIDDrvs(CATARep *head,CATARep **_ata_drv, - CATARep **_atapi_drv); -extern CBlkDev *ATAMount(U8 first_drv_let, - I64 type,I64 base0,I64 base1,I64 unit); -extern Bool ATAPIStartStop(CBlkDev *bd,F64 timeout,Bool start); -extern I64 ATAProbe(I64 base0,I64 base1,I64 unit); -extern U0 ATAReadBlks(CBlkDev *bd,U8 *buf, I64 blk, I64 cnt); -extern U0 ATAWriteBlks(CBlkDev *bd,U8 *buf, I64 blk, I64 cnt); -extern I64 BlkDevAdd(CBlkDev *bd,I64 prt_num=I64_MIN, - Bool whole_drv,Bool make_free); -extern U0 DskCacheInit(I64 size_in_U8s); -public extern U0 DskCacheInvalidate(CDrv *dv); -public extern I64 MountIDEAuto(); -public extern CBlkDevGlbls blkdev; - -#help_index "Graphics/Color" -extern U0 (*fp_set_std_palette)(); -public extern U8 *Color2Str(U8 *buf,CColorROPU32 c); -public extern CColorROPU16 Str2ColorU16(U8 *st); -public extern CColorROPU32 Str2ColorU32(U8 *st); - -#help_index "Hash" -#help_file "::/Doc/Hash" -public _extern _HASH_ADD U0 HashAdd(CHash *tmph,CHashTable *table); -public _extern _HASH_ADD_AFTER U0 HashAddAfter(CHash *tmph, - CHash *pred,CHashTable *table); //Add hash entry after entry. -public _extern _HASH_BUCKET_FIND CHash **HashBucketFind( - U8 *needle_str,CHashTable *haystack_table); -public _extern _HASH_FIND CHash *HashFind(U8 *needle_str, - CHashTable *haystack_table,I64 mask,I64 instance=1); -public _extern _HASH_SINGLE_TABLE_FIND CHash *HashSingleTableFind( - U8 *needle_str,CHashTable *haystack_table,I64 mask,I64 instance=1); -public _extern _HASH_STR I64 HashStr(U8 *st); -public extern CHashTable *HashTableNew(I64 size,CTask *mem_task=NULL); - -#help_index "Hash/Frame" -#help_file "::/Doc/Frame" -public extern I64 FramePtr(U8 *name,CTask *task=NULL); -public extern CHashGeneric *FramePtrAdd(U8 *name,I64 val=0,CTask *task=NULL); -public extern I64 FramePtrDel(U8 *name,CTask *task=NULL); -public extern I64 FramePtrSet(U8 *name,I64 val,CTask *task=NULL); - -#help_index "Hash/System" -public extern U0 HashDel(CHashSrcSym *tmph); -public extern CHashGeneric *HashGenericAdd(U8 *name, - I64 type,I64 val=0,I64 u8=0,I64 u16=0,CTask *task=NULL); -public extern CHashGeneric *HashPublic(U8 *st,I64 mask,Bool val=TRUE); -public _extern _HASH_REM_DEL Bool HashRemDel(CHash *tmph,CHashTable *table, - I64 instance=1);//instance must match tmph's -public extern U0 HashTableDel(CHashTable *table); -public extern I64 HashTablePurge(CHashTable *table); -public extern I64 HashTypeNum(CHash *tmph); -public extern I64 HashVal(CHash *tmph); -extern U0 SysSymImportsResolve(U8 *sptr,I64 ld_flags=0); - -#help_index "Hash/System;Char/Lists" -public extern I64 HashLstAdd(U8 *lst,I64 type,CHashTable *table); - -#help_index "Hash/System;Define;Char/Define;Char/Lists" -public extern I64 HashDefineLstAdd(U8 *dname,I64 type,CHashTable *table); - -#help_index "Help System;Debugging/Debugger" -public extern U0 Help(); - -#help_index "Info;File/Cmd Line (Typically);Cmd Line (Typically);Install" -public extern U0 DrvRep(); - -#help_index "Install" -#help_file "::/Doc/Install" -extern CATARep *ATARepFind(CATARep *haystack_head,I64 needle_num); -public extern Bool DrvEnable(U8 drv_let,Bool val); - -#help_index "Install;File/Cmd Line (Typically);Cmd Line (Typically);" -public extern U0 Fmt(U8 drv_let,Bool quick=TRUE, - Bool confirm=TRUE,I64 type=FSt_FAT32); - -#help_index "Install;Memory/BlkPool" -public extern I64 Scale2Mem(I64 min,I64 max,I64 limit=2*1024*1024*1024); - -#help_index "Job/Exe;Task/Job/Exe" -public extern U0 AdamErr(U8 *fmt,...); -public extern U0 AdamLog(U8 *fmt,...); -public extern I64 ExeCmdLine(CCmpCtrl *cc); -public extern U0 JobDel(CJob *tmpc); -public extern I64 JobsHndlr(I64 run_flags,CTask *task=NULL); -extern U0 SrvCmdLine(); -public extern U0 SrvTaskCont(); -public extern CJob *TaskExe(CTask *srv,CTask *master,U8 *data,I64 flags); -public extern U0 TaskRstAwaitingMsg(CTask *task=NULL); -public extern U0 UserTaskCont(); - -#help_index "Job/Exe;Task/Job/Exe;Compiler" -public extern I64 Adam(U8 *fmt,...); -public extern I64 PopUp(U8 *buf,CTask *parent=NULL,CTask **_pu_task=NULL); -public extern I64 PopUpPrint(U8 *fmt,...); - -#help_index "Job/Exe;Task/Job/Exe;MultiCore" -public extern I64 JobResGet(CJob *rqst=NULL); -public extern Bool JobResScan(CJob *rqst=NULL,I64 *_res=NULL); - -#help_index "Job/Text & Msgs;Task/Job/Text & Msgs" -public extern CJob *TaskText(CTask *srv,CTask *master,U8 *data,I64 flags); - -#help_index "Job/Text & Msgs;Task/Job/Text & Msgs;InFile;StdIn/InFile" -public extern U0 In(U8 *fmt,...); -public extern U0 InFile(U8 *filename); -public extern U0 InStr(U8 *fmt,...); -public extern U0 XTalk(CTask *task,U8 *fmt,...); -public extern U0 XTalkStr(CTask *task,U8 *fmt,...); -public extern U0 XTalkStrWait(CTask *task,U8 *fmt,...); -public extern U0 XTalkWait(CTask *task,U8 *fmt,...); - -#help_index "Job/Text & Msgs;Task/Job/Text & Msgs;Messages" -public extern U0 Msg(I64 msg_code,I64 arg1,I64 arg2,I64 flags=0); -public extern U0 PostMsg(CTask *task, - I64 msg_code,I64 arg1,I64 arg2,I64 flags=0); -public extern U0 PostMsgWait(CTask *task,I64 msg_code, - I64 arg1,I64 arg2,I64 flags=0); -public extern CJob *TaskMsg(CTask *srv,CTask *master, - I64 msg_code,I64 arg1,I64 arg2,I64 flags); - -#help_index "Job;Task/Job" -#help_file "::/Doc/Job" - -#help_index "Keyboard Devices/System;Char/System" -#help_file "::/Doc/KeyDev" -public extern U0 CtrlAltCBSet(U8 ch,U0 (*fp_hndlr)(I64 sc), - U8 *no_shift_desc=NULL,U8 *shift_desc=NULL,Bool in_irq=FALSE); -public extern U0 KeyDescSet(U8 *fmt,...); -public extern CKeyDevEntry *KeyDevAdd(Bool (*fp_put_key)(I64 ch,I64 sc), - Bool (*fp_puts)(U8 *st),I64 priority,Bool key_descs=FALSE); -public extern U0 KeyDevRem(CKeyDevEntry *tmpk); -extern CKeyDevGlbls keydev; -extern CJob sys_macro_head; -extern CTask *sys_macro_task; - -#help_index "Keyboard Devices;Char/Input;StdIn" -extern U8 *(*fp_getstr2)(I64 flags=0); //GetStr $LK,"Flags",A="MN:GSF_SHIFT_ESC_EXIT"$ -public extern Bool AreYouSure(); -public extern I64 GetChar(I64 *_scan_code=NULL,Bool echo=TRUE, - Bool raw_cursor=FALSE); -public extern I64 GetKey(I64 *_scan_code=NULL,Bool echo=FALSE, - Bool raw_cursor=FALSE); -public extern I64 GetS(U8 *buf,I64 size,Bool allow_ext=TRUE); -public extern U8 *GetStr(U8 *msg=NULL,U8 *dft=NULL,I64 flags=0); -extern U0 KbdInit(); -public extern I64 KbdMsEvtTime(); -extern U0 KbdMsHndlr(Bool poll_kbd,Bool poll_ms); -extern U0 KbdMsInit(); -extern I64 KbdMsgsQue(); -public extern U0 KbdTypeMatic(U8 delay); -extern Bool MsHardDrvrInstall(); -public extern I64 PressAKey(); -public extern I64 ScanChar(); -public extern Bool ScanKey(I64 *_ch=NULL,I64 *_scan_code=NULL,Bool echo=FALSE); -public extern Bool YorN(); -public extern CKbdStateGlbls kbd; - -#help_index "Math" -public extern I64 CeilI64(I64 num,I64 to); -public extern U64 CeilU64(U64 num,U64 to); -public extern F64 Clamp(F64 d,F64 lo,F64 hi); -public extern I64 FloorI64(I64 num,I64 to); -public extern U64 FloorU64(U64 num,U64 to); -public extern F64 Max(F64 n1,F64 n2); -public extern F64 Min(F64 n1,F64 n2); -public extern F64 Pow10I64(I64 i); -public extern F64 Rand(); //With timestamp -public extern I16 RandI16(); -public extern I32 RandI32(); -public extern I64 RandI64(); -public extern U16 RandU16(); -public extern U32 RandU32(); -public extern U64 RandU64(); -public extern I64 RoundI64(I64 num,I64 to); -public extern I64 Seed(I64 seed=0,CTask *task=NULL); - -#help_index "Memory/Adam Heap" -public extern U8 *ACAlloc(I64 size); -public extern U8 *AMAlloc(I64 size); -public extern U8 *AMAllocIdent(U8 *src); - -#help_index "Memory/BlkPool" -public extern U0 BlkPoolAdd(CBlkPool *bp,CMemBlk *m,I64 pags); -public extern U0 BlkPoolInit(CBlkPool *bp,I64 pags); -public extern U8 *MemPagAlloc(I64 pags,CBlkPool *bp=NULL); -public extern U0 MemPagFree(CMemBlk *m,CBlkPool *bp=NULL); - -#help_index "Memory/Heap" -public extern U8 *CAlloc(I64 size,CTask *mem_task=NULL); -public extern U8 *CAllocAligned(I64 size,I64 alignment, - CTask *mem_task=NULL,I64 misalignment=0); -public _extern _FREE U0 Free(U8 *addr); -public _extern _MALLOC U8 *MAlloc(I64 size,CTask *mem_task=NULL); -public extern U8 *MAllocAligned(I64 size,I64 alignment, - CTask *mem_task=NULL,I64 misalignment=0); -public extern U8 *MAllocIdent(U8 *src,CTask *mem_task=NULL); -public _extern _MHEAP_CTRL CHeapCtrl *MHeapCtrl(U8 *src); -public _extern _MSIZE I64 MSize(U8 *src); //size of heap object -public _extern _MSIZE2 I64 MSize2(U8 *src); //Internal size - -#help_index "Memory/HeapCtrl" -public extern U0 HeapCtrlDel(CHeapCtrl *hc); -public extern CHeapCtrl *HeapCtrlInit(CHeapCtrl *hc=NULL, - CTask *task=NULL,CBlkPool *bp); - -#help_index "Memory/Page Tables" -public extern I64 *MemPageTable(U8 *a); - -#help_index "Messages" -#help_file "::/Doc/Msgs" -public extern I64 FlushMsgs(CTask *task=NULL); -public extern I64 GetMsg(I64 *_arg1=NULL,I64 *_arg2=NULL, - I64 mask=~1,CTask *task=NULL); -extern U0 InputFilterTask(); -public extern I64 ScanMsg(I64 *_arg1=NULL,I64 *_arg2=NULL, - I64 mask=~1,CTask *task=NULL); - -#help_index "Misc" -public extern I64 EndianI64(I64 d); -public extern U16 EndianU16(U16 d); -public extern U32 EndianU32(U32 d); -public extern U0 QSort(U8 *base,I64 num, I64 width, - I64 (*fp_compare)(U8 *e1,U8 *e2)); -public extern U0 QSortI64(I64 *base,I64 num, - I64 (*fp_compare)(I64 e1,I64 e2)); -public extern F64 sys_os_version; - -#help_index "Misc/Progress Bars" -public extern U0 ProgressBarsRst(U8 *path=NULL); - -#help_index "Mouse" -#help_file "::/Doc/Mouse" -public extern U0 GridInit(); -public extern U0 MsSet(I64 x=I64_MAX,I64 y=I64_MAX,I64 z=I64_MAX, - I64 l=I64_MAX,I64 r=I64_MAX); -public extern CMsStateGlbls ms; -public extern CGridGlbls ms_grid; -public extern CMsHardStateGlbls ms_hard; -extern CMsHardStateGlbls ms_hard_last; -extern CMsStateGlbls ms_last; - -#help_index "Mouse/Ptr" -extern U0 MsInit(); -extern U0 MsUpdate(I64 x,I64 y,I64 z,Bool l,Bool r); - -#help_index "MultiCore" -extern U0 Core0StartMP(); -extern U0 CoreAPSethTask(); -public extern U0 MPInt(U8 num,I64 cpu_num=1); -public extern U0 MPIntAll(U8 num); -public extern U0 MPNMInt(); -extern CTask *SpawnQue(U0 (*fp_addr)(U8 *data),U8 *data=NULL, - U8 *task_name=NULL,I64 target_cpu, - CTask *parent=NULL, //NULL means adam - I64 stk_size=0,I64 flags=1<