Spexeah/Asuro
4
1
Fork 0
Code Issues 20 Pull Requests Actions Packages Projects 1 Releases Wiki Activity

Started rewrite of storage system.

Browse Source 
git-svn-id: https://spexeah.com:8443/svn/Asuro@1299 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
aaron
2020-07-17 22:30:36 +00:00
parent 984b6a89c8
commit d4234225d1
3 changed files with 114 additions and 365 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/driver/storage/fat32.pas
+6 -6
View File
@@ -357,7 +357,7 @@ begin
for i:= 0 to LL_Size(list) - 1 do begin for i:= 0 to LL_Size(list) - 1 do begin
dir := PDirectory(LL_get(list, i)); dir := PDirectory(LL_get(list, i));
entry^.fileName:= pchar(dir^.fileName); entry^.fileName:= pchar(dir^.fileName);
entry^.extension:= pchar(dir^.fileExtension); // entry^.extension:= pchar(dir^.fileExtension);
if dir^.attributes = $10 then begin if dir^.attributes = $10 then begin
entry^.entryType:= TDirectory_Entry_Type.directoryEntry; entry^.entryType:= TDirectory_Entry_Type.directoryEntry;
@@ -578,10 +578,10 @@ begin
for i:=0 to LL_size(directories) - 1 do begin for i:=0 to LL_size(directories) - 1 do begin
dir:= PDirectory(LL_get(directories, i)); dir:= PDirectory(LL_get(directories, i));
if (dir^.fileName = entry^.fileName) and (dir^.fileExtension = entry^.extension) then begin // if (dir^.fileName = entry^.fileName) and (dir^.fileExtension = entry^.extension) then begin
exists:= true; // exists:= true;
break; // break;
end; // end;
end; end;
push_trace('writefile.1'); push_trace('writefile.1');
@@ -613,7 +613,7 @@ begin
end else begin end else begin
push_trace('writefile.1.2.1'); push_trace('writefile.1.2.1');
startCluster:= writeDirectory(volume, directory, entry^.fileName, 0, status, entry^.extension); // startCluster:= writeDirectory(volume, directory, entry^.fileName, 0, status, entry^.extension);
clusterDifference:= (byteCount div bootRecord^.sectorsize) div 4; //-1 is that needed? clusterDifference:= (byteCount div bootRecord^.sectorsize) div 4; //-1 is that needed?
push_trace('writefile.1.2.2'); push_trace('writefile.1.2.2');
src/driver/storage/storagemanagement.pas
+101 -352
View File
File diff suppressed because it is too large Load Diff
src/prog/edit.pas
+2 -2
View File
@@ -75,7 +75,7 @@ begin
//writeintlnWND(info.key_code, getTerminalHWND()); //writeintlnWND(info.key_code, getTerminalHWND());
if (info.CTRL_DOWN and (info.key_code = 115)) then begin if (info.CTRL_DOWN and (info.key_code = 115)) then begin
//SAVE FILE //SAVE FILE
storagemanagement.writeNewFile(fileName, extension, puint32(chars), stringSize(chars)); // storagemanagement.writeNewFile(fileName, extension, puint32(chars), stringSize(chars));
writestringlnWND('saved', getTerminalHWND()); writestringlnWND('saved', getTerminalHWND());
//writeintlnWND(stringSize(chars), getTerminalHWND()); //writeintlnWND(stringSize(chars), getTerminalHWND());
end else begin end else begin
@@ -125,7 +125,7 @@ begin
bytes := puint32(kalloc(4)); bytes := puint32(kalloc(4));
bytes^ := 0; bytes^ := 0;
buffer := kalloc(4); buffer := kalloc(4);
error := storagemanagement.readfile(fileName, extension, buffer, bytes); // error := storagemanagement.readfile(fileName, extension, buffer, bytes);
if error^ = 1 then begin if error^ = 1 then begin
//file doesn't exists, make new //file doesn't exists, make new