2021-07-03 05:07:57 +01:00
<!DOCTYPE HTML>
< html >
< head >
< meta http-equiv = "Content-Type" content = "text/html;charset=US-ASCII" >
2021-12-11 11:10:58 +00:00
< meta name = "generator" content = "ZealOS V1.07" >
2021-07-03 05:07:57 +01:00
< style type = "text/css" >
2021-10-08 07:06:11 +01:00
body {background-color:#1f1f1f;}
.cF0{color:#e3e3e3;background-color:#1f1f1f;}
.cF1{color:#4f84a6;background-color:#1f1f1f;}
.cF2{color:#73a255;background-color:#1f1f1f;}
.cF3{color:#297582;background-color:#1f1f1f;}
.cF4{color:#b34f4b;background-color:#1f1f1f;}
.cF5{color:#8a52c3;background-color:#1f1f1f;}
.cF6{color:#b7822f;background-color:#1f1f1f;}
.cF7{color:#444444;background-color:#1f1f1f;}
.cF8{color:#6d6d6d;background-color:#1f1f1f;}
.cF9{color:#94bfde;background-color:#1f1f1f;}
.cFA{color:#a1ce97;background-color:#1f1f1f;}
.cFB{color:#6db4be;background-color:#1f1f1f;}
.cFC{color:#e88e88;background-color:#1f1f1f;}
.cFD{color:#ca94e8;background-color:#1f1f1f;}
.cFE{color:#d4b475;background-color:#1f1f1f;}
.cFF{color:#1f1f1f;background-color:#1f1f1f;}
2021-07-03 05:07:57 +01:00
< / style >
< / head >
< body >
2021-07-05 01:12:38 +01:00
< pre style = "font-family:monospace;font-size:12pt" >
2021-07-26 20:29:49 +01:00
< a name = "l1" > < / a > < span class = cF2 > // See < / span > < a href = "https://zeal-operating-system.github.io/ZealOS/Doc/RedSea.DD.html#l1" > < span class = cF4 > RedSea File System< / span > < / a > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l2" > < / a >
< a name = "l3" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFreeFreeList< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive)
< a name = "l4" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l5" > < / a > < / span > < span class = cF9 > CFreeList< / span > < span class = cF0 > *tmpf, *tmpf1;
< a name = "l6" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock;
< a name = "l7" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l8" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l9" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l10" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (tmpf = drive-> next_free)
< a name = "l11" > < / a > {
< a name = "l12" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (tmpf != & drive-> next_free)
< a name = "l13" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l14" > < / a > tmpf1 = tmpf-> next;
< a name = "l15" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (tmpf);
< a name = "l16" > < / a > tmpf = tmpf1;
< a name = "l17" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l18" > < / a > }
< a name = "l19" > < / a > drive-> next_free = < / span > < span class = cF3 > NULL< / span > < span class = cF0 > ;
< a name = "l20" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l21" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l22" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l23" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l24" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l25" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l26" > < / a > }
< a name = "l27" > < / a >
< a name = "l28" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFreeListBuild< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive)
< a name = "l29" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l30" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock;
< a name = "l31" > < / a > < / span > < span class = cF9 > CFreeList< / span > < span class = cF0 > *tmpf;
< a name = "l32" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i, first = drive-> data_area, max_blk = drive-> size + drive-> drv_offset;
2021-07-03 05:07:57 +01:00
< a name = "l33" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l34" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l35" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l36" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l37" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (drive-> next_free)
< a name = "l38" > < / a > < / span > < span class = cFD > RedSeaFreeFreeList< / span > < span class = cF0 > (drive);
< a name = "l39" > < / a > < / span > < span class = cF5 > QueueInit< / span > < span class = cF0 > (& drive-> next_free);
< a name = "l40" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (first < max_blk)
< a name = "l41" > < / a > {
< a name = "l42" > < / a > i = < / span > < span class = cFE > 0< / span > < span class = cF0 > ; < / span > < span class = cF2 > //count free clus< / span > < span class = cF0 >
< a name = "l43" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (first + i < max_blk)
< a name = "l44" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l45" > < / a > < / span > < span class = cFD > DriveFATBlkSet< / span > < span class = cF0 > (drive, first + i);
< a name = "l46" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > Bt< / span > < span class = cF7 > (< / span > < span class = cF0 > drive-> cur_fat_blk, (first + i - drive-> data_area) & (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > < < < / span > < span class = cFE > 3< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF0 > )< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l47" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l48" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l49" > < / a > i++;
< a name = "l50" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l51" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (i)
< a name = "l52" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
2021-07-06 21:15:26 +01:00
< a name = "l53" > < / a > tmpf = < / span > < span class = cF5 > SysMAlloc< / span > < span class = cF0 > (< / span > < span class = cF1 > sizeof< / span > < span class = cF7 > (< / span > < span class = cF9 > CFreeList< / span > < span class = cF7 > )< / span > < span class = cF0 > );
2021-07-04 23:11:34 +01:00
< a name = "l54" > < / a > tmpf-> size = i;
< a name = "l55" > < / a > tmpf-> < / span > < span class = cF1 > start< / span > < span class = cF0 > = first;
< a name = "l56" > < / a > < / span > < span class = cF5 > QueueInsert< / span > < span class = cF0 > (tmpf, drive-> last_free);
< a name = "l57" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l58" > < / a > first += i + < / span > < span class = cFE > 1< / span > < span class = cF0 > ;
< a name = "l59" > < / a > }
< a name = "l60" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l61" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l62" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l63" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l64" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l65" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l66" > < / a > }
< a name = "l67" > < / a >
< a name = "l68" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaInit< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive)
< a name = "l69" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l70" > < / a > < / span > < span class = cF9 > CRedSeaBoot< / span > < span class = cF0 > br;
< a name = "l71" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock;
2021-07-03 05:07:57 +01:00
< a name = "l72" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l73" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l74" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l75" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l76" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, & br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l77" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (br.signature != < / span > < span class = cF3 > MBR_PT_REDSEA< / span > < span class = cF0 > || br.signature2 != < / span > < span class = cFE > 0xAA55< / span > < span class = cF0 > )
< a name = "l78" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'Drive'< / span > < span class = cF0 > );
< a name = "l79" > < / a > drive-> fs_type = < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > ;
< a name = "l80" > < / a > < / span > < span class = cFD > RedSeaFreeFreeList< / span > < span class = cF0 > (drive);
< a name = "l81" > < / a > drive-> spc = < / span > < span class = cFE > 1< / span > < span class = cF0 > ;
< a name = "l82" > < / a > drive-> size = br.sects;
< a name = "l83" > < / a > drive-> data_area = drive-> drv_offset + br.bitmap_sects;
< a name = "l84" > < / a > drive-> root_clus = br.root_clus;
< a name = "l85" > < / a > drive-> fat1 = drive-> fat2 = drive-> drv_offset + < / span > < span class = cFE > 1< / span > < span class = cF0 > ;
< a name = "l86" > < / a > < / span > < span class = cFD > DriveFATBlkAlloc< / span > < span class = cF0 > (drive);
< a name = "l87" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l88" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l89" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l90" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l91" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l92" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l93" > < / a > }
< a name = "l94" > < / a >
< a name = "l95" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaValidate< / span > < span class = cF0 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > drv_let)
< a name = "l96" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l97" > < / a > < / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive;
< a name = "l98" > < / a > < / span > < span class = cF9 > CRedSeaBoot< / span > < span class = cF0 > br;
2021-07-03 05:07:57 +01:00
< a name = "l99" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l100" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF7 > (< / span > < span class = cF0 > drive = < / span > < span class = cF5 > Letter2Drive< / span > < span class = cF0 > (drv_let, < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > )< / span > < span class = cF7 > )< / span > < span class = cF0 > & & drive-> fs_type == < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > & &
< a name = "l101" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF7 > (< / span > < span class = cF0 > drive, & br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > & & br.signature == < / span > < span class = cF3 > MBR_PT_REDSEA< / span > < span class = cF0 > & & br.signature2 == < / span > < span class = cFE > 0xAA55< / span > < span class = cF0 > )
< a name = "l102" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l103" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l104" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l105" > < / a > }
< a name = "l106" > < / a >
< a name = "l107" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFormat< / span > < span class = cF0 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > drv_let, < / span > < span class = cF1 > Bool< / span > < span class = cF0 > quick=< / span > < span class = cF3 > TRUE< / span > < span class = cF0 > )
< a name = "l108" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l109" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *root_dir;
< a name = "l110" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *d_native;
< a name = "l111" > < / a > < / span > < span class = cF9 > CRedSeaBoot< / span > < span class = cF0 > *br = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l112" > < / a > < / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive = < / span > < span class = cF5 > Letter2Drive< / span > < span class = cF0 > (drv_let);
< a name = "l113" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i, n, root_dir_blks;
2021-07-03 05:07:57 +01:00
< a name = "l114" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l115" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l116" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l117" > < / a > < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l118" > < / a > < / span > < span class = cF2 > //< / span > < span class = cF0 > < / span > < span class = cF2 > DriveTypeSet(drv_let, FSt_REDSEA);< / span > < span class = cF0 >
< a name = "l119" > < / a > < / span > < span class = cFD > DriveTypeSet< / span > < span class = cF0 > (drv_let, < / span > < span class = cF3 > FSt_FAT32< / span > < span class = cF0 > );
< a name = "l120" > < / a > drive-> fs_type = < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > ;
< a name = "l121" > < / a > br-> signature = < / span > < span class = cF3 > MBR_PT_REDSEA< / span > < span class = cF0 > ;
< a name = "l122" > < / a > br-> signature2 = < / span > < span class = cFE > 0xAA55< / span > < span class = cF0 > ;
< a name = "l123" > < / a > br-> drv_offset = drive-> drv_offset; < / span > < span class = cF2 > //For CD/DVD image copy.< / span > < span class = cF0 >
< a name = "l124" > < / a > br-> sects = drive-> size;
< a name = "l125" > < / a > n = (br-> sects + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > < < < / span > < span class = cFE > 3< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF0 > ) / < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > < < < / span > < span class = cFE > 3< / span > < span class = cF0 > ;
< a name = "l126" > < / a > br-> bitmap_sects = n;
< a name = "l127" > < / a > br-> unique_id = < / span > < span class = cF5 > TSCGet< / span > < span class = cF0 > ^< / span > < span class = cF5 > Now< / span > < span class = cF0 > ()(< / span > < span class = cF9 > U64< / span > < span class = cF0 > );
< a name = "l128" > < / a > br-> root_clus = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l129" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l130" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (quick)
< a name = "l131" > < / a > i = n + < / span > < span class = cFE > 1< / span > < span class = cF0 > ;
< a name = "l132" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l133" > < / a > i = drive-> size;
< a name = "l134" > < / a > < / span > < span class = cF5 > BlkWriteZero< / span > < span class = cF0 > (drive, drive-> drv_offset, i);
2021-07-03 05:07:57 +01:00
< a name = "l135" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l136" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l137" > < / a > < / span > < span class = cFD > RedSeaInit< / span > < span class = cF0 > (drive);
< a name = "l138" > < / a > < / span > < span class = cF5 > ClusAlloc< / span > < span class = cF0 > (drive, < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cFE > 1< / span > < span class = cF0 > , < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ); < / span > < span class = cF2 > //Alloc #1< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l139" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l140" > < / a > root_dir_blks = < / span > < span class = cF5 > MaxI64< / span > < span class = cF0 > (< / span > < span class = cFE > 1< / span > < span class = cF0 > , drive-> bd-> init_root_dir_blks);
< a name = "l141" > < / a > br-> root_clus = < / span > < span class = cF5 > ClusAlloc< / span > < span class = cF0 > (drive, < / span > < span class = cFE > 0< / span > < span class = cF0 > , root_dir_blks, < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > );
< a name = "l142" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l143" > < / a > root_dir = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > * root_dir_blks);
2021-07-03 05:07:57 +01:00
< a name = "l144" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l145" > < / a > d_native = root_dir - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l146" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l147" > < / a > d_native-> attr = < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > | < / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l148" > < / a > *d_native-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l149" > < / a > d_native-> clus = br-> root_clus;
< a name = "l150" > < / a > d_native-> size = < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > * root_dir_blks;
< a name = "l151" > < / a > d_native-> datetime = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l152" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l153" > < / a > d_native(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l154" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l155" > < / a > *d_native-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l156" > < / a > d_native-> name[< / span > < span class = cFE > 1< / span > < span class = cF0 > ] = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l157" > < / a > d_native-> attr = < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > | < / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l158" > < / a > d_native-> clus = br-> root_clus;
< a name = "l159" > < / a > d_native-> datetime = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l160" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l161" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, root_dir, br-> root_clus, root_dir_blks);
< a name = "l162" > < / a > < / span > < span class = cFD > RedSeaInit< / span > < span class = cF0 > (drive);
< a name = "l163" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l164" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l165" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l166" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l167" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (br);
< a name = "l168" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (root_dir);
2021-07-03 05:07:57 +01:00
< a name = "l169" > < / a > }
< a name = "l170" > < / a >
< a name = "l171" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFileFind< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF9 > I64< / span > < span class = cF0 > cur_dir_clus, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *name, < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *_res, < / span > < span class = cF9 > I64< / span > < span class = cF0 > fuf_flags=< / span > < span class = cFE > 0< / span > < span class = cF0 > )
2021-08-16 05:52:03 +01:00
< a name = "l172" > < / a > {< / span > < span class = cF2 > //< / span > < a href = "https://zeal-operating-system.github.io/ZealOS/Kernel/KernelA.HH.html#l3256" > < span class = cF4 > FUF_JUST_DIRS< / span > < / a > < span class = cF2 > , < / span > < a href = "https://zeal-operating-system.github.io/ZealOS/Kernel/KernelA.HH.html#l3257" > < span class = cF4 > FUF_JUST_FILES< / span > < / a > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l173" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *buf, *buf2, *ptr;
< a name = "l174" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > dname[< / span > < span class = cF3 > CDIR_FILENAME_LEN< / span > < span class = cF0 > ];
< a name = "l175" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > ch;
< a name = "l176" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > res = < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > , unlock;
2021-07-03 05:07:57 +01:00
< a name = "l177" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l178" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (fuf_flags & ~< / span > < span class = cF3 > FUG_FILE_FIND< / span > < span class = cF0 > )
< a name = "l179" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'FUF'< / span > < span class = cF0 > );
< a name = "l180" > < / a > < / span > < span class = cF5 > MemSet< / span > < span class = cF0 > (_res, < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cF1 > sizeof< / span > < span class = cF7 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF7 > )< / span > < span class = cF0 > );
< a name = "l181" > < / a > < / span > < span class = cF5 > DriveCheck< / span > < span class = cF0 > (drive);
< a name = "l182" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (drive-> fs_type != < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > )
< a name = "l183" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Not RedSea Drive\n" < / span > < span class = cF0 > );
< a name = "l184" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cFD > CFileNameTo< / span > < span class = cF7 > (< / span > < span class = cF0 > dname, name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l185" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Invalid FileName: \" %s\" .\n" < / span > < span class = cF0 > , name);
< a name = "l186" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l187" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l188" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l189" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l190" > < / a > buf2 = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l191" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf2, cur_dir_clus, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l192" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l193" > < / a > ptr = buf2(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l194" > < / a > buf = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (ptr-> size);
< a name = "l195" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf, cur_dir_clus, ptr-> size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l196" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf2);
2021-07-03 05:07:57 +01:00
< a name = "l197" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l198" > < / a > ptr = buf(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l199" > < / a > *ptr-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l200" > < / a > ptr-> name[< / span > < span class = cFE > 1< / span > < span class = cF0 > ] = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l201" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (< / span > < span class = cF3 > TRUE< / span > < span class = cF0 > )
< a name = "l202" > < / a > {
< a name = "l203" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ch = *ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l204" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l205" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF7 > )< / span > < span class = cF0 > & &
< a name = "l206" > < / a > !< / span > < span class = cF7 > (< / span > < span class = cF0 > fuf_flags & < / span > < span class = cF3 > FUF_JUST_DIRS< / span > < span class = cF0 > & & !(ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > )< / span > < span class = cF7 > )< / span > < span class = cF0 > & &
< a name = "l207" > < / a > !< / span > < span class = cF7 > (< / span > < span class = cF0 > fuf_flags & < / span > < span class = cF3 > FUF_JUST_FILES< / span > < span class = cF0 > & & ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF7 > )< / span > < span class = cF0 > & &
< a name = "l208" > < / a > !< / span > < span class = cF5 > StrCompare< / span > < span class = cF7 > (< / span > < span class = cF0 > dname, ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l209" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l210" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (& _res-> attr, & ptr-> attr, < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > );
< a name = "l211" > < / a > res = < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l212" > < / a > < / span > < span class = cF1 > goto< / span > < span class = cF0 > rsff_done;
< a name = "l213" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l214" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l215" > < / a > }
2021-07-03 05:07:57 +01:00
< a name = "l216" > < / a > rsff_done:
2021-07-04 23:11:34 +01:00
< a name = "l217" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l218" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l219" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l220" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l221" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l222" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l223" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l224" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l225" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > res;
2021-07-03 05:07:57 +01:00
< a name = "l226" > < / a > }
< a name = "l227" > < / a >
< a name = "l228" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *< / span > < span class = cFD > RedSeaFileRead< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *cur_dir, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *filename, < / span > < span class = cF9 > I64< / span > < span class = cF0 > *_size, < / span > < span class = cF9 > I64< / span > < span class = cF0 > *_attr)
< a name = "l229" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l230" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *buf = < / span > < span class = cF3 > NULL< / span > < span class = cF0 > ;
< a name = "l231" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > de;
< a name = "l232" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > c, blk_count, cur_dir_clus;
2021-07-03 05:07:57 +01:00
< a name = "l233" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l234" > < / a > < / span > < span class = cF5 > DriveCheck< / span > < span class = cF0 > (drive);
< a name = "l235" > < / a > *_size = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l236" > < / a > *_attr = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l237" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (drive-> fs_type != < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > )
< a name = "l238" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Not RedSea Drive\n" < / span > < span class = cF0 > );
< a name = "l239" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l240" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l241" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l242" > < / a > < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l243" > < / a > cur_dir_clus = < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, cur_dir);
< a name = "l244" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cFD > RedSeaFileFind< / span > < span class = cF7 > (< / span > < span class = cF0 > drive, cur_dir_clus, filename, & de, < / span > < span class = cF3 > FUF_JUST_FILES< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l245" > < / a > {
< a name = "l246" > < / a > blk_count = (de.size + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF0 > ) > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > ;
< a name = "l247" > < / a > buf = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (blk_count < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > + < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l248" > < / a > c = de.clus;
< a name = "l249" > < / a > c = < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf, c, blk_count);
< a name = "l250" > < / a > buf[de.size] = < / span > < span class = cFE > 0< / span > < span class = cF0 > ; < / span > < span class = cF2 > //Terminate< / span > < span class = cF0 >
< a name = "l251" > < / a > *_size = de.size;
< a name = "l252" > < / a > *_attr = < / span > < span class = cF5 > FileAttr< / span > < span class = cF0 > (de.name, de.attr);
< a name = "l253" > < / a > }
< a name = "l254" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l255" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l256" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l257" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l258" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l259" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > buf;
2021-07-03 05:07:57 +01:00
< a name = "l260" > < / a > }
< a name = "l261" > < / a >
< a name = "l262" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaCd< / span > < span class = cF0 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *name, < / span > < span class = cF9 > I64< / span > < span class = cF0 > cur_dir_clus)
< a name = "l263" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l264" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > de;
2021-07-03 05:07:57 +01:00
< a name = "l265" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l266" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > Fs< / span > < span class = cF0 > -> cur_dv-> fs_type != < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > )
< a name = "l267" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Not RedSea Drive\n" < / span > < span class = cF0 > );
< a name = "l268" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cFD > RedSeaFileFind< / span > < span class = cF7 > (< / span > < span class = cF5 > Fs< / span > < span class = cF0 > -> cur_dv, cur_dir_clus, name, & de, < / span > < span class = cF3 > FUF_JUST_DIRS< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l269" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l270" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l271" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " File not found: \" %s\" .\n" < / span > < span class = cF0 > , name);
2021-07-03 05:07:57 +01:00
< a name = "l272" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l273" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l274" > < / a > }
< a name = "l275" > < / a >
< a name = "l276" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF5 > RedSeaFreeClus< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF9 > I64< / span > < span class = cF0 > c, < / span > < span class = cF9 > I64< / span > < span class = cF0 > count)
< a name = "l277" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l278" > < / a > < / span > < span class = cF9 > CFreeList< / span > < span class = cF0 > *tmpf;
< a name = "l279" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > found = < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > , unlock, unlock_break;
2021-07-03 05:07:57 +01:00
< a name = "l280" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l281" > < / a > < / span > < span class = cF5 > DriveCheck< / span > < span class = cF0 > (drive);
< a name = "l282" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!c)
< a name = "l283" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > ;
< a name = "l284" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (drive-> fs_type != < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > )
< a name = "l285" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Not RedSea Drive\n" < / span > < span class = cF0 > );
< a name = "l286" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l287" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l288" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l289" > < / a > unlock_break = < / span > < span class = cF5 > BreakLock< / span > < span class = cF0 > ;
< a name = "l290" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l291" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!drive-> next_free)
< a name = "l292" > < / a > < / span > < span class = cFD > RedSeaFreeListBuild< / span > < span class = cF0 > (drive);
< a name = "l293" > < / a > tmpf = drive-> next_free;
< a name = "l294" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (!found & & tmpf != & drive-> next_free)
< a name = "l295" > < / a > {
< a name = "l296" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (tmpf-> < / span > < span class = cF1 > start< / span > < span class = cF0 > + tmpf-> size == c)
< a name = "l297" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l298" > < / a > tmpf-> size += count;
< a name = "l299" > < / a > found = < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l300" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l301" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (c + count == tmpf-> < / span > < span class = cF1 > start< / span > < span class = cF0 > )
< a name = "l302" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l303" > < / a > tmpf-> size += count;
< a name = "l304" > < / a > tmpf-> < / span > < span class = cF1 > start< / span > < span class = cF0 > = c;
< a name = "l305" > < / a > found = < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l306" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l307" > < / a > tmpf = tmpf-> next;
< a name = "l308" > < / a > }
< a name = "l309" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!found)
< a name = "l310" > < / a > {
2021-07-06 21:15:26 +01:00
< a name = "l311" > < / a > tmpf = < / span > < span class = cF5 > SysMAlloc< / span > < span class = cF0 > (< / span > < span class = cF1 > sizeof< / span > < span class = cF7 > (< / span > < span class = cF9 > CFreeList< / span > < span class = cF7 > )< / span > < span class = cF0 > );
2021-07-04 23:11:34 +01:00
< a name = "l312" > < / a > tmpf-> size = count;
< a name = "l313" > < / a > tmpf-> < / span > < span class = cF1 > start< / span > < span class = cF0 > = c;
< a name = "l314" > < / a > < / span > < span class = cF5 > QueueInsert< / span > < span class = cF0 > (tmpf, drive-> last_free);
< a name = "l315" > < / a > }
< a name = "l316" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (count-- > < / span > < span class = cFE > 0< / span > < span class = cF0 > )
< a name = "l317" > < / a > {
< a name = "l318" > < / a > < / span > < span class = cFD > DriveFATBlkSet< / span > < span class = cF0 > (drive, c);
< a name = "l319" > < / a > < / span > < span class = cF5 > LBtr< / span > < span class = cF0 > (drive-> cur_fat_blk, < / span > < span class = cF7 > (< / span > < span class = cF0 > c - drive-> data_area< / span > < span class = cF7 > )< / span > < span class = cF0 > & < / span > < span class = cF7 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > < < < / span > < span class = cFE > 3< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > );
< a name = "l320" > < / a > < / span > < span class = cF5 > LBts< / span > < span class = cF0 > (& drive-> fat_blk_dirty, < / span > < span class = cFE > 0< / span > < span class = cF0 > );
< a name = "l321" > < / a > c++;
< a name = "l322" > < / a > }
< a name = "l323" > < / a > < / span > < span class = cFD > DriveFATBlkClean< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l324" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l325" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l326" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l327" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l328" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l329" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l330" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l331" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l332" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l333" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l334" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l335" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l336" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l337" > < / a > }
< a name = "l338" > < / a >
< a name = "l339" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaAllocClus< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF9 > I64< / span > < span class = cF0 > count)
< a name = "l340" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l341" > < / a > < / span > < span class = cF9 > CFreeList< / span > < span class = cF0 > *tmpf, *best_free = < / span > < span class = cF3 > NULL< / span > < span class = cF0 > ;
< a name = "l342" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i, first, best_size = < / span > < span class = cF3 > I64_MAX< / span > < span class = cF0 > ;
< a name = "l343" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock, unlock_break;
2021-07-03 05:07:57 +01:00
< a name = "l344" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l345" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (count < = < / span > < span class = cFE > 0< / span > < span class = cF0 > )
< a name = "l346" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'Drive'< / span > < span class = cF0 > );
< a name = "l347" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l348" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l349" > < / a > unlock_break = < / span > < span class = cF5 > BreakLock< / span > < span class = cF0 > ;
< a name = "l350" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l351" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!drive-> next_free)
< a name = "l352" > < / a > < / span > < span class = cFD > RedSeaFreeListBuild< / span > < span class = cF0 > (drive);
< a name = "l353" > < / a > tmpf = drive-> next_free;
< a name = "l354" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (tmpf != & drive-> next_free)
< a name = "l355" > < / a > {
< a name = "l356" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (tmpf-> size > = count & & tmpf-> size < best_size)
< a name = "l357" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l358" > < / a > best_free = tmpf;
< a name = "l359" > < / a > best_size = tmpf-> size;
< a name = "l360" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (tmpf-> size == count)
< a name = "l361" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l362" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l363" > < / a > tmpf = tmpf-> next;
< a name = "l364" > < / a > }
< a name = "l365" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!best_free)
< a name = "l366" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'Drive'< / span > < span class = cF0 > );
< a name = "l367" > < / a > first = best_free-> < / span > < span class = cF1 > start< / span > < span class = cF0 > ;
< a name = "l368" > < / a > < / span > < span class = cF1 > for< / span > < span class = cF0 > (i = < / span > < span class = cFE > 0< / span > < span class = cF0 > ; i < count; i++)
< a name = "l369" > < / a > {
< a name = "l370" > < / a > < / span > < span class = cFD > DriveFATBlkSet< / span > < span class = cF0 > (drive, first + i);
< a name = "l371" > < / a > < / span > < span class = cF5 > LBts< / span > < span class = cF0 > (drive-> cur_fat_blk, < / span > < span class = cF7 > (< / span > < span class = cF0 > first + i - drive-> data_area< / span > < span class = cF7 > )< / span > < span class = cF0 > & < / span > < span class = cF7 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > < < < / span > < span class = cFE > 3< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > );
< a name = "l372" > < / a > < / span > < span class = cF5 > LBts< / span > < span class = cF0 > (& drive-> fat_blk_dirty, < / span > < span class = cFE > 0< / span > < span class = cF0 > );
< a name = "l373" > < / a > }
< a name = "l374" > < / a > < / span > < span class = cFD > DriveFATBlkClean< / span > < span class = cF0 > (drive);
< a name = "l375" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (best_free-> size -= count)
< a name = "l376" > < / a > best_free-> < / span > < span class = cF1 > start< / span > < span class = cF0 > += count;
< a name = "l377" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l378" > < / a > {
< a name = "l379" > < / a > < / span > < span class = cF5 > QueueRemove< / span > < span class = cF0 > (best_free);
< a name = "l380" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (best_free);
< a name = "l381" > < / a > }
< a name = "l382" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l383" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l384" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l385" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l386" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l387" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l388" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l389" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l390" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l391" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l392" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l393" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l394" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l395" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > first;
2021-07-03 05:07:57 +01:00
< a name = "l396" > < / a > }
< a name = "l397" > < / a >
< a name = "l398" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaDirNew< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *cur_dir, < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *tmpde, < / span > < span class = cF1 > Bool< / span > < span class = cF0 > free_old_chain)
< a name = "l399" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l400" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *buf, *buf2, *ptr, de2;
< a name = "l401" > < / a > < / span > < span class = cF9 > CRedSeaBoot< / span > < span class = cF0 > *br;
< a name = "l402" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > c, ch, i = < / span > < span class = cFE > 1< / span > < span class = cF0 > , j = < / span > < span class = cFE > 0< / span > < span class = cF0 > , n = < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > / < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > , dir_size, cur_dir_clus;
< a name = "l403" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > written = < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > , unlock, unlock_break;
< a name = "l404" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *tmp, *parent_dir;
2021-07-03 05:07:57 +01:00
< a name = "l405" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l406" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l407" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l408" > < / a > unlock_break = < / span > < span class = cF5 > BreakLock< / span > < span class = cF0 > ;
< a name = "l409" > < / a > tmpde-> attr |= < / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l410" > < / a > unlock = < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l411" > < / a > cur_dir_clus = < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, cur_dir);
< a name = "l412" > < / a > buf2 = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l413" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf2, cur_dir_clus, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l414" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l415" > < / a > ptr = buf2(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l416" > < / a > buf = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (ptr-> size);
< a name = "l417" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf, cur_dir_clus, ptr-> size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l418" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l419" > < / a > dir_size = ptr-> size;
< a name = "l420" > < / a > ptr = buf(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > ) + < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l421" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf2);
< a name = "l422" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (< / span > < span class = cF3 > TRUE< / span > < span class = cF0 > )
< a name = "l423" > < / a > {
< a name = "l424" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ch = *ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l425" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l426" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!written)
< a name = "l427" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (& ptr-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , & tmpde-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > );
< a name = "l428" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF7 > (< / span > < span class = cF0 > i + < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > * < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > + j < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > < dir_size)
< a name = "l429" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf< / span > < span class = cF7 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *< / span > < span class = cF7 > )< / span > < span class = cF0 > + j < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > , cur_dir_clus + j, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l430" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l431" > < / a > {
< a name = "l432" > < / a > buf2 = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (dir_size + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l433" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (buf2, buf, dir_size);
< a name = "l434" > < / a > < / span > < span class = cF5 > RedSeaFreeClus< / span > < span class = cF0 > (drive, cur_dir_clus, dir_size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l435" > < / a > dir_size += < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > ;
< a name = "l436" > < / a > c = < / span > < span class = cF5 > ClusAlloc< / span > < span class = cF0 > (drive, < / span > < span class = cFE > 0< / span > < span class = cF0 > , dir_size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > , < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > );
< a name = "l437" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l438" > < / a > buf = buf2;
< a name = "l439" > < / a > ptr = buf(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l440" > < / a > ptr-> size = dir_size;
< a name = "l441" > < / a > ptr-> clus = c;
< a name = "l442" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf, c, dir_size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l443" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (cur_dir_clus == drive-> root_clus)
< a name = "l444" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l445" > < / a > br = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l446" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l447" > < / a > br-> root_clus = c;
< a name = "l448" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, br, drive-> drv_offset, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l449" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (br);
< a name = "l450" > < / a > drive-> root_clus = c;
< a name = "l451" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l452" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l453" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l454" > < / a > tmp = < / span > < span class = cF5 > StrNew< / span > < span class = cF0 > (cur_dir);
< a name = "l455" > < / a > parent_dir = < / span > < span class = cF5 > StrNew< / span > < span class = cF0 > (cur_dir);
< a name = "l456" > < / a > < / span > < span class = cF5 > StrLastRemove< / span > < span class = cF0 > (parent_dir, < / span > < span class = cF6 > " /" < / span > < span class = cF0 > , tmp);
< a name = "l457" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!*parent_dir)
< a name = "l458" > < / a > {
< a name = "l459" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (parent_dir);
< a name = "l460" > < / a > parent_dir = < / span > < span class = cF5 > StrNew< / span > < span class = cF0 > (< / span > < span class = cF6 > " /" < / span > < span class = cF0 > );
< a name = "l461" > < / a > }
< a name = "l462" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cFD > RedSeaFileFind< / span > < span class = cF7 > (< / span > < span class = cF0 > drive, < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, parent_dir), tmp, & de2, < / span > < span class = cF3 > FUF_JUST_DIRS< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l463" > < / a > {
< a name = "l464" > < / a > de2.clus = c;
< a name = "l465" > < / a > de2.size = dir_size;
< a name = "l466" > < / a > < / span > < span class = cFD > RedSeaDirNew< / span > < span class = cF0 > (drive, parent_dir, & de2, < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > );
< a name = "l467" > < / a > }
< a name = "l468" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l469" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'Drive'< / span > < span class = cF0 > );
< a name = "l470" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (tmp);
< a name = "l471" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (parent_dir);
< a name = "l472" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l473" > < / a > }
< a name = "l474" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l475" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l476" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF0 > )
< a name = "l477" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l478" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!written)
< a name = "l479" > < / a > {
< a name = "l480" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (& ptr-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , & tmpde-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > );
< a name = "l481" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf< / span > < span class = cF7 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *< / span > < span class = cF7 > )< / span > < span class = cF0 > + j < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > , cur_dir_clus + j, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l482" > < / a > written = < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l483" > < / a > }
< a name = "l484" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l485" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l486" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l487" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF5 > StrCompare< / span > < span class = cF7 > (< / span > < span class = cF0 > tmpde-> name, ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l488" > < / a > {
< a name = "l489" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (free_old_chain)
< a name = "l490" > < / a > < / span > < span class = cF5 > RedSeaFreeClus< / span > < span class = cF0 > (drive, ptr-> clus, < / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> size + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l491" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!written)
< a name = "l492" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (& ptr-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , & tmpde-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > );
< a name = "l493" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l494" > < / a > ptr-> attr |= < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF0 > ;
< a name = "l495" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf< / span > < span class = cF7 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *< / span > < span class = cF7 > )< / span > < span class = cF0 > + j < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > , cur_dir_clus + j, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l496" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l497" > < / a > }
< a name = "l498" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l499" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l500" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (++i > = n)
< a name = "l501" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l502" > < / a > j++;
< a name = "l503" > < / a > i = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l504" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l505" > < / a > }
< a name = "l506" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l507" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l508" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l509" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l510" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l511" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l512" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l513" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l514" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock)
< a name = "l515" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l516" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l517" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l518" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l519" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l520" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l521" > < / a > }
< a name = "l522" > < / a >
< a name = "l523" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFilesDel< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *cur_dir, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *files_find_mask, < / span > < span class = cF9 > I64< / span > < span class = cF0 > fuf_flags, < / span > < span class = cF1 > Bool< / span > < span class = cF0 > del_dir, < / span > < span class = cF1 > Bool< / span > < span class = cF0 > print_message)
< a name = "l524" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l525" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *buf, *buf2, *ptr;
< a name = "l526" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i = < / span > < span class = cFE > 0< / span > < span class = cF0 > , res = < / span > < span class = cFE > 0< / span > < span class = cF0 > , ch, j = < / span > < span class = cFE > 0< / span > < span class = cF0 > , n = < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > / < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > , cur_dir_clus;
< a name = "l527" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock_break;
2021-07-03 05:07:57 +01:00
< a name = "l528" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l529" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l530" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l531" > < / a > unlock_break = < / span > < span class = cF5 > BreakLock< / span > < span class = cF0 > ;
< a name = "l532" > < / a > < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l533" > < / a > cur_dir_clus = < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, cur_dir);
< a name = "l534" > < / a > buf2 = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l535" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf2, cur_dir_clus, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l536" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l537" > < / a > ptr = buf2(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l538" > < / a > buf = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (ptr-> size);
< a name = "l539" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf, cur_dir_clus, ptr-> size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l540" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf2);
2021-07-03 05:07:57 +01:00
< a name = "l541" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l542" > < / a > ptr = buf(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l543" > < / a > *ptr-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l544" > < / a > ptr-> name[< / span > < span class = cFE > 1< / span > < span class = cF0 > ] = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l545" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (< / span > < span class = cF3 > TRUE< / span > < span class = cF0 > )
< a name = "l546" > < / a > {
< a name = "l547" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ch = *ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l548" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l549" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF7 > )< / span > < span class = cF0 > & & ch != < / span > < span class = cF6 > '.'< / span > < span class = cF0 > & &
< a name = "l550" > < / a > < / span > < span class = cF7 > (< / span > < span class = cF0 > del_dir || !(ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > )< / span > < span class = cF7 > )< / span > < span class = cF0 > & & < / span > < span class = cF5 > FilesFindMatch< / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> name, files_find_mask, fuf_flags< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l551" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l552" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l553" > < / a > res++;
< a name = "l554" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (print_message)
< a name = "l555" > < / a > < / span > < span class = cF6 > " Del %s\n" < / span > < span class = cF0 > , ptr-> name;
< a name = "l556" > < / a > ptr-> attr |= < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF0 > ;
< a name = "l557" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf< / span > < span class = cF7 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *< / span > < span class = cF7 > )< / span > < span class = cF0 > + j < < < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > , cur_dir_clus + j, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l558" > < / a > < / span > < span class = cF5 > RedSeaFreeClus< / span > < span class = cF0 > (drive, ptr-> clus, < / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> size + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l559" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l560" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l561" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (++i > = n)
< a name = "l562" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l563" > < / a > j++;
< a name = "l564" > < / a > i = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l565" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l566" > < / a > }
< a name = "l567" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l568" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l569" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l570" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l571" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l572" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l573" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l574" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l575" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l576" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l577" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l578" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l579" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > res;
2021-07-03 05:07:57 +01:00
< a name = "l580" > < / a > }
< a name = "l581" > < / a >
< a name = "l582" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaFileWrite< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *cur_dir, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *name, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *buf, < / span > < span class = cF9 > I64< / span > < span class = cF0 > size, < / span > < span class = cF9 > CDate< / span > < span class = cF0 > cdt, < / span > < span class = cF9 > I64< / span > < span class = cF0 > attr)
< a name = "l583" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l584" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > de;
< a name = "l585" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > c = < / span > < span class = cFE > 0< / span > < span class = cF0 > , blk_count;
2021-07-03 05:07:57 +01:00
< a name = "l586" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l587" > < / a > < / span > < span class = cF5 > MemSet< / span > < span class = cF0 > (& de, < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cF1 > sizeof< / span > < span class = cF7 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF7 > )< / span > < span class = cF0 > );
< a name = "l588" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (size < < / span > < span class = cFE > 0< / span > < span class = cF0 > )
< a name = "l589" > < / a > size = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l590" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (drive-> fs_type != < / span > < span class = cF3 > FSt_REDSEA< / span > < span class = cF0 > )
< a name = "l591" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Not RedSea Drive\n" < / span > < span class = cF0 > );
< a name = "l592" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cFD > CFileNameTo< / span > < span class = cF7 > (< / span > < span class = cF0 > de.name, name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l593" > < / a > < / span > < span class = cF5 > PrintErr< / span > < span class = cF0 > (< / span > < span class = cF6 > " Invalid FileName: \" %s\" .\n" < / span > < span class = cF0 > , name);
< a name = "l594" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l595" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l596" > < / a > < / span > < span class = cFD > RedSeaFilesDel< / span > < span class = cF0 > (drive, cur_dir, de.name, < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > , < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > );
< a name = "l597" > < / a > de.size = size;
< a name = "l598" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (blk_count = < / span > < span class = cF7 > (< / span > < span class = cF0 > size + < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > - < / span > < span class = cFE > 1< / span > < span class = cF7 > )< / span > < span class = cF0 > > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > )
< a name = "l599" > < / a > c = < / span > < span class = cF5 > ClusAlloc< / span > < span class = cF0 > (drive, < / span > < span class = cFE > 0< / span > < span class = cF0 > , blk_count, < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ); < / span > < span class = cF2 > //Always contiguous< / span > < span class = cF0 >
< a name = "l600" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l601" > < / a > c = < / span > < span class = cF3 > INVALID_CLUS< / span > < span class = cF0 > ;
< a name = "l602" > < / a > de.clus = c;
< a name = "l603" > < / a > de.attr = attr|< / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l604" > < / a > de.datetime = cdt;
< a name = "l605" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (blk_count)
< a name = "l606" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf, c, blk_count);
< a name = "l607" > < / a > < / span > < span class = cFD > RedSeaDirNew< / span > < span class = cF0 > (drive, cur_dir, & de, < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > );
< a name = "l608" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l609" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > c;
2021-07-03 05:07:57 +01:00
< a name = "l610" > < / a > }
< a name = "l611" > < / a >
< a name = "l612" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *< / span > < span class = cFD > RedSeaFilesFind< / span > < span class = cF0 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *files_find_mask, < / span > < span class = cF9 > I64< / span > < span class = cF0 > fuf_flags, < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *parent=< / span > < span class = cF3 > NULL< / span > < span class = cF0 > )
< a name = "l613" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l614" > < / a > < / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive = < / span > < span class = cF5 > Fs< / span > < span class = cF0 > -> cur_dv;
< a name = "l615" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *buf, *buf2, *ptr, *res = < / span > < span class = cF3 > NULL< / span > < span class = cF0 > , *tmpde;
< a name = "l616" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > ch, cur_dir_clus;
2021-07-03 05:07:57 +01:00
< a name = "l617" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l618" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (fuf_flags & ~< / span > < span class = cF3 > FUG_FILES_FIND< / span > < span class = cF0 > )
< a name = "l619" > < / a > < / span > < span class = cF5 > throw< / span > < span class = cF0 > (< / span > < span class = cF6 > 'FUF'< / span > < span class = cF0 > );
< a name = "l620" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l621" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l622" > < / a > < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l623" > < / a > cur_dir_clus = < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, < / span > < span class = cF5 > Fs< / span > < span class = cF0 > -> cur_dir);
< a name = "l624" > < / a > buf2 = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (< / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
< a name = "l625" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf2, cur_dir_clus, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l626" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l627" > < / a > ptr = buf2(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l628" > < / a > buf = < / span > < span class = cF5 > MAlloc< / span > < span class = cF0 > (ptr-> size);
< a name = "l629" > < / a > < / span > < span class = cF5 > BlkRead< / span > < span class = cF0 > (drive, buf, cur_dir_clus, ptr-> size > > < / span > < span class = cF3 > BLK_SIZE_BITS< / span > < span class = cF0 > );
< a name = "l630" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf2);
2021-07-03 05:07:57 +01:00
< a name = "l631" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l632" > < / a > ptr = buf(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l633" > < / a > *ptr-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l634" > < / a > ptr-> name[< / span > < span class = cFE > 1< / span > < span class = cF0 > ] = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l635" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l636" > < / a > ptr-> clus = < / span > < span class = cF5 > Name2ParentDirClus< / span > < span class = cF0 > (drive, < / span > < span class = cF5 > Fs< / span > < span class = cF0 > -> cur_dir);
< a name = "l637" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) -= < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l638" > < / a > < / span > < span class = cF1 > while< / span > < span class = cF0 > (< / span > < span class = cF3 > TRUE< / span > < span class = cF0 > )
< a name = "l639" > < / a > {
< a name = "l640" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ch = *ptr-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l641" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l642" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > ptr-> attr & < / span > < span class = cF3 > RS_ATTR_DELETED< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l643" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l644" > < / a > tmpde = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (< / span > < span class = cF1 > sizeof< / span > < span class = cF7 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF7 > )< / span > < span class = cF0 > );
< a name = "l645" > < / a > < / span > < span class = cF5 > MemCopy< / span > < span class = cF0 > (& tmpde-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , & ptr-> < / span > < span class = cF1 > start< / span > < span class = cF0 > , < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > );
< a name = "l646" > < / a > tmpde-> parent = parent;
< a name = "l647" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > Bt< / span > < span class = cF7 > (< / span > < span class = cF0 > & fuf_flags, < / span > < span class = cF3 > FUf_RECURSE< / span > < span class = cF7 > )< / span > < span class = cF0 > & & tmpde-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > & & *tmpde-> name != < / span > < span class = cF6 > '.'< / span > < span class = cF0 > )
< a name = "l648" > < / a > {
< a name = "l649" > < / a > tmpde-> next = res;
< a name = "l650" > < / a > res = tmpde;
< a name = "l651" > < / a > tmpde-> full_name = < / span > < span class = cF5 > DirNameAbs< / span > < span class = cF0 > (tmpde-> name);
< a name = "l652" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l653" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF5 > Cd< / span > < span class = cF7 > (< / span > < span class = cF0 > tmpde-> name< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l654" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l655" > < / a > tmpde-> sub = < / span > < span class = cFD > RedSeaFilesFind< / span > < span class = cF0 > (files_find_mask, fuf_flags, tmpde);
< a name = "l656" > < / a > < / span > < span class = cF5 > Cd< / span > < span class = cF0 > (< / span > < span class = cF6 > " .." < / span > < span class = cF0 > );
< a name = "l657" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l658" > < / a > < / span > < span class = cF5 > DriveLock< / span > < span class = cF0 > (drive);
< a name = "l659" > < / a > }
< a name = "l660" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l661" > < / a > {
< a name = "l662" > < / a > tmpde-> full_name = < / span > < span class = cF5 > FileNameAbs< / span > < span class = cF0 > (tmpde-> name);
< a name = "l663" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (< / span > < span class = cF7 > (< / span > < span class = cF0 > tmpde-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > || !< / span > < span class = cF5 > Bt< / span > < span class = cF0 > (& fuf_flags, < / span > < span class = cF3 > FUf_JUST_DIRS< / span > < span class = cF0 > )< / span > < span class = cF7 > )< / span > < span class = cF0 > & &
< a name = "l664" > < / a > !< / span > < span class = cF7 > (< / span > < span class = cF5 > Bt< / span > < span class = cF0 > (& fuf_flags, < / span > < span class = cF3 > FUf_RECURSE< / span > < span class = cF0 > ) & & *tmpde-> name == < / span > < span class = cF6 > '.'< / span > < span class = cF0 > & & tmpde-> attr & < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF7 > )< / span > < span class = cF0 > & &
< a name = "l665" > < / a > < / span > < span class = cF5 > FilesFindMatch< / span > < span class = cF7 > (< / span > < span class = cF0 > tmpde-> full_name, files_find_mask, fuf_flags< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l666" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l667" > < / a > tmpde-> next = res;
< a name = "l668" > < / a > res = tmpde;
< a name = "l669" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l670" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l671" > < / a > < / span > < span class = cF5 > DirEntryDel< / span > < span class = cF0 > (tmpde);
< a name = "l672" > < / a > }
< a name = "l673" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l674" > < / a > ptr(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
< a name = "l675" > < / a > }
< a name = "l676" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l677" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
< a name = "l678" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l679" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l680" > < / a > < / span > < span class = cF5 > DriveUnlock< / span > < span class = cF0 > (drive);
2021-07-03 05:07:57 +01:00
< a name = "l681" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l682" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > res;
2021-07-03 05:07:57 +01:00
< a name = "l683" > < / a > }
< a name = "l684" > < / a >
< a name = "l685" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cFD > RedSeaMkDir< / span > < span class = cF0 > (< / span > < span class = cF9 > CDrive< / span > < span class = cF0 > *drive, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *cur_dir, < / span > < span class = cF1 > U8< / span > < span class = cF0 > *name, < / span > < span class = cF9 > I64< / span > < span class = cF0 > entry_count)
Rename abs_addres to abs_address.
Update documentation/comments to rename addr, fun, var, stmt, blk, desc, reg, seg, ptr, dup, clus, val, and bttn, to address, function, variable, statement, block, description, register, segment, pointer, duplicate, cluster, value, and button, respectively.
2021-10-07 02:35:32 +01:00
< a name = "l686" > < / a > {< / span > < span class = cF2 > //entry_count is for preallocating dir blocks.< / span > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l687" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > c, cur_dir_clus = < / span > < span class = cF5 > Name2DirClus< / span > < span class = cF0 > (drive, cur_dir), size = < / span > < span class = cF5 > CeilU64< / span > < span class = cF0 > (< / span > < span class = cF7 > (< / span > < span class = cF0 > entry_count + < / span > < span class = cFE > 3< / span > < span class = cF7 > )< / span > < span class = cF0 > < < < / span > < span class = cFE > 6< / span > < span class = cF0 > , < / span > < span class = cF3 > BLK_SIZE< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l688" > < / a > #< / span > < span class = cF1 > assert< / span > < span class = cF0 > < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > == < / span > < span class = cFE > 64< / span > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l689" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *buf = < / span > < span class = cF5 > CAlloc< / span > < span class = cF0 > (size);
< a name = "l690" > < / a > < / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > *d_native = buf - < / span > < span class = cF1 > offset< / span > < span class = cF0 > (< / span > < span class = cF9 > CDirEntry< / span > < span class = cF0 > .< / span > < span class = cF1 > start< / span > < span class = cF0 > );
< a name = "l691" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > unlock_break;
2021-07-03 05:07:57 +01:00
< a name = "l692" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l693" > < / a > < / span > < span class = cF1 > try< / span > < span class = cF0 >
< a name = "l694" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l695" > < / a > unlock_break = < / span > < span class = cF5 > BreakLock< / span > < span class = cF0 > ;
< a name = "l696" > < / a > c = < / span > < span class = cF5 > FileWrite< / span > < span class = cF0 > (name, buf, size, < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > );
< a name = "l697" > < / a > d_native-> attr = < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > | < / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l698" > < / a > < / span > < span class = cF5 > StrCopy< / span > < span class = cF0 > (d_native-> name, name);
< a name = "l699" > < / a > d_native-> clus = c;
< a name = "l700" > < / a > d_native-> size = size;
< a name = "l701" > < / a > d_native-> datetime = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
< a name = "l702" > < / a > d_native(< / span > < span class = cF1 > U8< / span > < span class = cF0 > *) += < / span > < span class = cF3 > CDIR_SIZE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l703" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l704" > < / a > d_native-> attr = < / span > < span class = cF3 > RS_ATTR_DIR< / span > < span class = cF0 > | < / span > < span class = cF3 > RS_ATTR_CONTIGUOUS< / span > < span class = cF0 > ;
< a name = "l705" > < / a > *d_native-> name = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l706" > < / a > d_native-> name[< / span > < span class = cFE > 1< / span > < span class = cF0 > ] = < / span > < span class = cF6 > '.'< / span > < span class = cF0 > ;
< a name = "l707" > < / a > d_native-> name[< / span > < span class = cFE > 2< / span > < span class = cF0 > ] = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l708" > < / a > d_native-> clus = cur_dir_clus;
< a name = "l709" > < / a > d_native-> size = < / span > < span class = cFE > 0< / span > < span class = cF0 > ;
< a name = "l710" > < / a > d_native-> datetime = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
< a name = "l711" > < / a > < / span > < span class = cF5 > BlkWrite< / span > < span class = cF0 > (drive, buf, c, < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l712" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (buf);
< a name = "l713" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l714" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
< a name = "l715" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l716" > < / a > < / span > < span class = cF1 > catch< / span > < span class = cF0 >
< a name = "l717" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (unlock_break)
< a name = "l718" > < / a > < / span > < span class = cF5 > BreakUnlock< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l719" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l720" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l721" > < / a > }
< / span > < / pre > < / body >
< / html >
