search for: fppread

Displaying 1 result from an estimated 1 matches for "fppread".

Did you mean: fb_read
2007 Jul 24
1
Custom kinit to find device by "label"
...teError('mknod with dev_minor: ' + IntToStr(dev_minor)); EXIT; //exit w/ error end; dev_minor := dev_minor + 16; FileDescriptor := FpOpen(DEVICENAME, 0, 0); if FileDescriptor >= 0 then begin WriteLn('Opened device: ', DEVICENAME); ReadBytes := FpPRead(FileDescriptor, PChar(ActualFSLabel), Length(ActualFSLabel), $478); if (ReadBytes = Length(ActualFSLabel)) then begin if (ActualFSLabel = RootFSLabel) then begin Result := True; DeviceFound := True; end; end else WriteError('Reading...