mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
This commit is contained in:
Alexander Koblov
parent
02afc5dc89
commit
e47009a7e0
3 changed files with 443 additions and 459 deletions
|
|
@ -1,421 +1,409 @@
|
|||
unit ufsplugin; {Plugin definitions version 1.5}
|
||||
|
||||
interface
|
||||
|
||||
uses SysUtils;
|
||||
|
||||
{ ids for FsGetFile }
|
||||
|
||||
const FS_FILE_OK=0;
|
||||
|
||||
FS_FILE_EXISTS=1;
|
||||
|
||||
FS_FILE_NOTFOUND=2;
|
||||
|
||||
FS_FILE_READERROR=3;
|
||||
|
||||
FS_FILE_WRITEERROR=4;
|
||||
|
||||
FS_FILE_USERABORT=5;
|
||||
|
||||
FS_FILE_NOTSUPPORTED=6;
|
||||
|
||||
FS_FILE_EXISTSRESUMEALLOWED=7;
|
||||
|
||||
FS_EXEC_OK=0;
|
||||
|
||||
FS_EXEC_ERROR=1;
|
||||
|
||||
FS_EXEC_YOURSELF=-1;
|
||||
|
||||
FS_EXEC_SYMLINK=-2;
|
||||
|
||||
FS_COPYFLAGS_OVERWRITE=1;
|
||||
|
||||
FS_COPYFLAGS_RESUME=2;
|
||||
|
||||
FS_COPYFLAGS_MOVE=4;
|
||||
|
||||
FS_COPYFLAGS_EXISTS_SAMECASE=8;
|
||||
|
||||
FS_COPYFLAGS_EXISTS_DIFFERENTCASE=16;
|
||||
|
||||
|
||||
|
||||
{ flags for tRequestProc }
|
||||
|
||||
const
|
||||
|
||||
RT_Other=0;
|
||||
|
||||
RT_UserName=1;
|
||||
|
||||
RT_Password=2;
|
||||
|
||||
RT_Account=3;
|
||||
|
||||
RT_UserNameFirewall=4;
|
||||
|
||||
RT_PasswordFirewall=5;
|
||||
|
||||
RT_TargetDir=6;
|
||||
|
||||
RT_URL=7;
|
||||
|
||||
RT_MsgOK=8;
|
||||
|
||||
RT_MsgYesNo=9;
|
||||
|
||||
RT_MsgOKCancel=10;
|
||||
|
||||
{ flags for tLogProc }
|
||||
|
||||
const msgtype_connect=1;
|
||||
|
||||
msgtype_disconnect=2;
|
||||
|
||||
msgtype_details=3;
|
||||
|
||||
msgtype_transfercomplete=4;
|
||||
|
||||
msgtype_connectcomplete=5;
|
||||
|
||||
msgtype_importanterror=6;
|
||||
|
||||
msgtype_operationcomplete=7;
|
||||
|
||||
{ flags for FsStatusInfo }
|
||||
|
||||
const FS_STATUS_START=0;
|
||||
|
||||
FS_STATUS_END=1;
|
||||
|
||||
FS_STATUS_OP_LIST=1;
|
||||
|
||||
FS_STATUS_OP_GET_SINGLE=2;
|
||||
|
||||
FS_STATUS_OP_GET_MULTI=3;
|
||||
|
||||
FS_STATUS_OP_PUT_SINGLE=4;
|
||||
|
||||
FS_STATUS_OP_PUT_MULTI=5;
|
||||
|
||||
FS_STATUS_OP_RENMOV_SINGLE=6;
|
||||
|
||||
FS_STATUS_OP_RENMOV_MULTI=7;
|
||||
|
||||
FS_STATUS_OP_DELETE=8;
|
||||
|
||||
FS_STATUS_OP_ATTRIB=9;
|
||||
|
||||
FS_STATUS_OP_MKDIR=10;
|
||||
|
||||
FS_STATUS_OP_EXEC=11;
|
||||
|
||||
FS_STATUS_OP_CALCSIZE=12;
|
||||
|
||||
FS_STATUS_OP_SEARCH=13;
|
||||
|
||||
FS_STATUS_OP_SEARCH_TEXT=14;
|
||||
|
||||
FS_STATUS_OP_SYNC_SEARCH=15;
|
||||
|
||||
FS_STATUS_OP_SYNC_GET=16;
|
||||
|
||||
FS_STATUS_OP_SYNC_PUT=17;
|
||||
|
||||
FS_STATUS_OP_SYNC_DELETE=18;
|
||||
|
||||
{Flags for FsExtractCustomIcon}
|
||||
|
||||
const FS_ICONFLAG_SMALL=1;
|
||||
|
||||
FS_ICONFLAG_BACKGROUND=2;
|
||||
|
||||
FS_ICON_USEDEFAULT=0;
|
||||
|
||||
FS_ICON_EXTRACTED=1;
|
||||
|
||||
FS_ICON_EXTRACTED_DESTROY=2;
|
||||
|
||||
FS_ICON_DELAYED=3;
|
||||
|
||||
const FS_BITMAP_NONE=0;
|
||||
|
||||
FS_BITMAP_EXTRACTED=1;
|
||||
|
||||
FS_BITMAP_EXTRACT_YOURSELF=2;
|
||||
|
||||
FS_BITMAP_EXTRACT_YOURSELF_ANDDELETE=3;
|
||||
|
||||
FS_BITMAP_CACHE=256;
|
||||
|
||||
const
|
||||
MAXDWORD = DWORD($FFFFFFFF);
|
||||
|
||||
type
|
||||
TInt64Rec = packed record
|
||||
case Boolean of
|
||||
True : (Value : Int64);
|
||||
False : (Low,High : DWORD);
|
||||
end;
|
||||
|
||||
bool = type boolean;
|
||||
type
|
||||
{$IFDEF MSWINDOWS}
|
||||
FILETIME = Windows.FILETIME;
|
||||
{$ELSE}
|
||||
FILETIME = record
|
||||
dwLowDateTime : DWORD;
|
||||
dwHighDateTime : DWORD;
|
||||
end;
|
||||
{$ENDIF}
|
||||
LPFILETIME = ^FILETIME;
|
||||
_FILETIME = FILETIME;
|
||||
TFILETIME = FILETIME;
|
||||
PFILETIME = ^FILETIME;
|
||||
|
||||
|
||||
{$ifdef UNICODE}
|
||||
TBYTE = word;
|
||||
TCHAR = widechar;
|
||||
BCHAR = word;
|
||||
{$else}
|
||||
TBYTE = byte;
|
||||
TCHAR = char;
|
||||
BCHAR = BYTE;
|
||||
{$endif}
|
||||
|
||||
WIN32_FIND_DATA = record
|
||||
dwFileAttributes : DWORD;
|
||||
ftCreationTime : TFILETIME;
|
||||
ftLastAccessTime : TFILETIME;
|
||||
ftLastWriteTime : TFILETIME;
|
||||
nFileSizeHigh : DWORD;
|
||||
nFileSizeLow : DWORD;
|
||||
dwReserved0 : DWORD;
|
||||
dwReserved1 : DWORD;
|
||||
cFileName : array[0..(MAX_PATH)-1] of TCHAR;
|
||||
cAlternateFileName : array[0..13] of TCHAR;
|
||||
end;
|
||||
tWIN32FINDDATA = WIN32_FIND_DATA;
|
||||
HICON = THANDLE;
|
||||
|
||||
|
||||
type
|
||||
|
||||
tRemoteInfo=record
|
||||
|
||||
SizeLow,SizeHigh:longint;
|
||||
|
||||
LastWriteTime:TFileTime;
|
||||
|
||||
Attr:longint;
|
||||
|
||||
end;
|
||||
|
||||
pRemoteInfo=^tRemoteInfo;
|
||||
|
||||
type
|
||||
|
||||
tFsDefaultParamStruct=record
|
||||
|
||||
size,
|
||||
|
||||
PluginInterfaceVersionLow,
|
||||
|
||||
PluginInterfaceVersionHi:longint;
|
||||
|
||||
DefaultIniName:array[0..MAX_PATH-1] of char;
|
||||
|
||||
end;
|
||||
|
||||
pFsDefaultParamStruct=^tFsDefaultParamStruct;
|
||||
|
||||
{ callback functions }
|
||||
|
||||
type
|
||||
|
||||
TProgressProc=function(PluginNr:integer;SourceName,
|
||||
|
||||
TargetName:pchar;PercentDone:integer):integer; stdcall;
|
||||
|
||||
TLogProc=procedure(PluginNr,MsgType:integer;LogString:pchar); stdcall;
|
||||
|
||||
TRequestProc=function(PluginNr,RequestType:integer;CustomTitle,CustomText,
|
||||
|
||||
ReturnedText:pchar;maxlen:integer):boolean; stdcall;
|
||||
|
||||
{ Function prototypes - the callback functions MUST be implemented exactly like this! }
|
||||
|
||||
{
|
||||
|
||||
function FsInit(PluginNr:integer;pProgressProc:tProgressProc;pLogProc:tLogProc;
|
||||
|
||||
pRequestProc:tRequestProc):integer; stdcall;
|
||||
|
||||
function FsFindFirst(path :pchar;var FindData:tWIN32FINDDATA):thandle; stdcall;
|
||||
|
||||
function FsFindNext(Hdl:thandle;var FindData:tWIN32FINDDATA):bool; stdcall;
|
||||
|
||||
function FsFindClose(Hdl:thandle):integer; stdcall;
|
||||
|
||||
function FsMkDir(RemoteDir:pchar):bool; stdcall;
|
||||
|
||||
function FsExecuteFile(MainWin:thandle;RemoteName,Verb:pchar):integer; stdcall;
|
||||
|
||||
function FsRenMovFile(OldName,NewName:pchar;Move,OverWrite:bool;
|
||||
|
||||
RemoteInfo:pRemoteInfo):integer; stdcall;
|
||||
|
||||
function FsGetFile(RemoteName,LocalName:pchar;CopyFlags:integer;
|
||||
|
||||
RemoteInfo:pRemoteInfo):integer; stdcall;
|
||||
|
||||
function FsPutFile(LocalName,RemoteName:pchar;CopyFlags:integer):integer; stdcall;
|
||||
|
||||
function FsDeleteFile(RemoteName:pchar):bool; stdcall;
|
||||
|
||||
function FsRemoveDir(RemoteName:pchar):bool; stdcall;
|
||||
|
||||
function FsDisconnect(DisconnectRoot:pchar):bool; stdcall;
|
||||
|
||||
function FsSetAttr(RemoteName:pchar;NewAttr:integer):bool; stdcall;
|
||||
|
||||
function FsSetTime(RemoteName:pchar;CreationTime,LastAccessTime,
|
||||
|
||||
LastWriteTime:PFileTime):bool; stdcall;
|
||||
|
||||
procedure FsStatusInfo(RemoteDir:pchar;InfoStartEnd,InfoOperation:integer); stdcall;
|
||||
|
||||
procedure FsGetDefRootName(DefRootName:pchar;maxlen:integer); stdcall;
|
||||
|
||||
function FsExtractCustomIcon(RemoteName:pchar;ExtractFlags:integer;
|
||||
|
||||
var TheIcon:hicon):integer; stdcall;
|
||||
|
||||
procedure FsSetDefaultParams(dps:pFsDefaultParamStruct); stdcall;
|
||||
|
||||
function FsGetPreviewBitmap(RemoteName:pchar,width,height:integer,
|
||||
|
||||
var ReturnedBitmap:hbitmap):integer; stdcall;
|
||||
|
||||
function FsLinksToLocalFiles:bool; stdcall;
|
||||
|
||||
function FsGetLocalName(RemoteName:pchar;maxlen:integer):bool; stdcall;
|
||||
|
||||
}
|
||||
|
||||
{****************************** content plugin part *****************************}
|
||||
|
||||
const ft_nomorefields=0;
|
||||
|
||||
ft_numeric_32=1;
|
||||
|
||||
ft_numeric_64=2;
|
||||
|
||||
ft_numeric_floating=3;
|
||||
|
||||
ft_date=4;
|
||||
|
||||
ft_time=5;
|
||||
|
||||
ft_boolean=6;
|
||||
|
||||
ft_multiplechoice=7;
|
||||
|
||||
ft_string=8;
|
||||
|
||||
ft_fulltext=9;
|
||||
|
||||
ft_datetime=10;
|
||||
|
||||
// for ContentGetValue
|
||||
|
||||
ft_nosuchfield=-1;
|
||||
|
||||
ft_fileerror=-2;
|
||||
|
||||
ft_fieldempty=-3;
|
||||
|
||||
ft_ondemand=-4;
|
||||
|
||||
ft_delayed=0;
|
||||
|
||||
// for ContentSetValue
|
||||
|
||||
ft_setsuccess=0;
|
||||
|
||||
setflags_first_attribute=1; {First attribute of this file}
|
||||
|
||||
setflags_last_attribute=2;
|
||||
|
||||
setflags_only_date=4;
|
||||
|
||||
CONTENT_DELAYIFSLOW=1; // ContentGetValue called in foreground
|
||||
|
||||
type tContentDefaultParamStruct=record
|
||||
|
||||
size,
|
||||
|
||||
PluginInterfaceVersionLow,
|
||||
|
||||
PluginInterfaceVersionHi:longint;
|
||||
|
||||
DefaultIniName:array[0..MAX_PATH-1] of char;
|
||||
|
||||
end;
|
||||
|
||||
pContentDefaultParamStruct=^tContentDefaultParamStruct;
|
||||
|
||||
type tdateformat=record
|
||||
|
||||
wYear,wMonth,wDay:word;
|
||||
|
||||
end;
|
||||
|
||||
pdateformat=^tdateformat;
|
||||
|
||||
type ttimeformat=record
|
||||
|
||||
wHour,wMinute,wSecond:word;
|
||||
|
||||
end;
|
||||
|
||||
ptimeformat=^ttimeformat;
|
||||
|
||||
{ Function prototypes: }
|
||||
|
||||
{
|
||||
|
||||
procedure FsContentGetDetectString(DetectString:pchar;maxlen:integer); stdcall;
|
||||
|
||||
function FsContentGetSupportedField(FieldIndex:integer;FieldName:pchar;
|
||||
|
||||
Units:pchar;maxlen:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetValue(FileName:pchar;FieldIndex,UnitIndex:integer;FieldValue:pbyte;
|
||||
|
||||
maxlen,flags:integer):integer; stdcall;
|
||||
|
||||
procedure FsContentSetDefaultParams(dps:pContentDefaultParamStruct); stdcall;
|
||||
|
||||
procedure FsContentStopGetValue(FileName:pchar); stdcall;
|
||||
|
||||
function FsContentGetDefaultSortOrder(FieldIndex:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetSupportedFieldFlags(FieldIndex:integer):integer; stdcall;
|
||||
|
||||
function FsContentSetValue(FileName:pchar;FieldIndex,UnitIndex,FieldType:integer;
|
||||
|
||||
FieldValue:pbyte;flags:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetDefaultView(ViewContents,ViewHeaders,ViewWidths,
|
||||
|
||||
ViewOptions:pchar;maxlen:integer):bool; stdcall;
|
||||
|
||||
}
|
||||
|
||||
implementation
|
||||
|
||||
end.
|
||||
unit ufsplugin; {Plugin definitions version 1.5}
|
||||
|
||||
interface
|
||||
|
||||
uses SysUtils {$IFDEF WINDOWS}, Windows{$ENDIF};
|
||||
|
||||
{ ids for FsGetFile }
|
||||
|
||||
const FS_FILE_OK=0;
|
||||
|
||||
FS_FILE_EXISTS=1;
|
||||
|
||||
FS_FILE_NOTFOUND=2;
|
||||
|
||||
FS_FILE_READERROR=3;
|
||||
|
||||
FS_FILE_WRITEERROR=4;
|
||||
|
||||
FS_FILE_USERABORT=5;
|
||||
|
||||
FS_FILE_NOTSUPPORTED=6;
|
||||
|
||||
FS_FILE_EXISTSRESUMEALLOWED=7;
|
||||
|
||||
FS_EXEC_OK=0;
|
||||
|
||||
FS_EXEC_ERROR=1;
|
||||
|
||||
FS_EXEC_YOURSELF=-1;
|
||||
|
||||
FS_EXEC_SYMLINK=-2;
|
||||
|
||||
FS_COPYFLAGS_OVERWRITE=1;
|
||||
|
||||
FS_COPYFLAGS_RESUME=2;
|
||||
|
||||
FS_COPYFLAGS_MOVE=4;
|
||||
|
||||
FS_COPYFLAGS_EXISTS_SAMECASE=8;
|
||||
|
||||
FS_COPYFLAGS_EXISTS_DIFFERENTCASE=16;
|
||||
|
||||
|
||||
|
||||
{ flags for tRequestProc }
|
||||
|
||||
const
|
||||
|
||||
RT_Other=0;
|
||||
|
||||
RT_UserName=1;
|
||||
|
||||
RT_Password=2;
|
||||
|
||||
RT_Account=3;
|
||||
|
||||
RT_UserNameFirewall=4;
|
||||
|
||||
RT_PasswordFirewall=5;
|
||||
|
||||
RT_TargetDir=6;
|
||||
|
||||
RT_URL=7;
|
||||
|
||||
RT_MsgOK=8;
|
||||
|
||||
RT_MsgYesNo=9;
|
||||
|
||||
RT_MsgOKCancel=10;
|
||||
|
||||
{ flags for tLogProc }
|
||||
|
||||
const msgtype_connect=1;
|
||||
|
||||
msgtype_disconnect=2;
|
||||
|
||||
msgtype_details=3;
|
||||
|
||||
msgtype_transfercomplete=4;
|
||||
|
||||
msgtype_connectcomplete=5;
|
||||
|
||||
msgtype_importanterror=6;
|
||||
|
||||
msgtype_operationcomplete=7;
|
||||
|
||||
{ flags for FsStatusInfo }
|
||||
|
||||
const FS_STATUS_START=0;
|
||||
|
||||
FS_STATUS_END=1;
|
||||
|
||||
FS_STATUS_OP_LIST=1;
|
||||
|
||||
FS_STATUS_OP_GET_SINGLE=2;
|
||||
|
||||
FS_STATUS_OP_GET_MULTI=3;
|
||||
|
||||
FS_STATUS_OP_PUT_SINGLE=4;
|
||||
|
||||
FS_STATUS_OP_PUT_MULTI=5;
|
||||
|
||||
FS_STATUS_OP_RENMOV_SINGLE=6;
|
||||
|
||||
FS_STATUS_OP_RENMOV_MULTI=7;
|
||||
|
||||
FS_STATUS_OP_DELETE=8;
|
||||
|
||||
FS_STATUS_OP_ATTRIB=9;
|
||||
|
||||
FS_STATUS_OP_MKDIR=10;
|
||||
|
||||
FS_STATUS_OP_EXEC=11;
|
||||
|
||||
FS_STATUS_OP_CALCSIZE=12;
|
||||
|
||||
FS_STATUS_OP_SEARCH=13;
|
||||
|
||||
FS_STATUS_OP_SEARCH_TEXT=14;
|
||||
|
||||
FS_STATUS_OP_SYNC_SEARCH=15;
|
||||
|
||||
FS_STATUS_OP_SYNC_GET=16;
|
||||
|
||||
FS_STATUS_OP_SYNC_PUT=17;
|
||||
|
||||
FS_STATUS_OP_SYNC_DELETE=18;
|
||||
|
||||
{Flags for FsExtractCustomIcon}
|
||||
|
||||
const FS_ICONFLAG_SMALL=1;
|
||||
|
||||
FS_ICONFLAG_BACKGROUND=2;
|
||||
|
||||
FS_ICON_USEDEFAULT=0;
|
||||
|
||||
FS_ICON_EXTRACTED=1;
|
||||
|
||||
FS_ICON_EXTRACTED_DESTROY=2;
|
||||
|
||||
FS_ICON_DELAYED=3;
|
||||
|
||||
const FS_BITMAP_NONE=0;
|
||||
|
||||
FS_BITMAP_EXTRACTED=1;
|
||||
|
||||
FS_BITMAP_EXTRACT_YOURSELF=2;
|
||||
|
||||
FS_BITMAP_EXTRACT_YOURSELF_ANDDELETE=3;
|
||||
|
||||
FS_BITMAP_CACHE=256;
|
||||
|
||||
const
|
||||
MAXDWORD = DWORD($FFFFFFFF);
|
||||
|
||||
type
|
||||
TInt64Rec = packed record
|
||||
case Boolean of
|
||||
True : (Value : Int64);
|
||||
False : (Low,High : DWORD);
|
||||
end;
|
||||
|
||||
BOOL = LongBool;
|
||||
HBITMAP = THandle;
|
||||
HICON = THandle;
|
||||
|
||||
type
|
||||
{$IFDEF WINDOWS}
|
||||
FILETIME = Windows.FILETIME;
|
||||
{$ELSE}
|
||||
FILETIME = record
|
||||
dwLowDateTime : DWORD;
|
||||
dwHighDateTime : DWORD;
|
||||
end;
|
||||
{$ENDIF}
|
||||
TFileTime = FILETIME;
|
||||
PFileTime = ^FILETIME;
|
||||
|
||||
WIN32_FIND_DATA = record
|
||||
dwFileAttributes : DWORD;
|
||||
ftCreationTime : TFILETIME;
|
||||
ftLastAccessTime : TFILETIME;
|
||||
ftLastWriteTime : TFILETIME;
|
||||
nFileSizeHigh : DWORD;
|
||||
nFileSizeLow : DWORD;
|
||||
dwReserved0 : DWORD;
|
||||
dwReserved1 : DWORD;
|
||||
cFileName : array[0..(MAX_PATH)-1] of CHAR;
|
||||
cAlternateFileName : array[0..13] of CHAR;
|
||||
end;
|
||||
TWin32FindData = WIN32_FIND_DATA;
|
||||
|
||||
type
|
||||
|
||||
tRemoteInfo=record
|
||||
|
||||
SizeLow,SizeHigh:longint;
|
||||
|
||||
LastWriteTime:TFileTime;
|
||||
|
||||
Attr:longint;
|
||||
|
||||
end;
|
||||
|
||||
pRemoteInfo=^tRemoteInfo;
|
||||
|
||||
type
|
||||
|
||||
tFsDefaultParamStruct=record
|
||||
|
||||
size,
|
||||
|
||||
PluginInterfaceVersionLow,
|
||||
|
||||
PluginInterfaceVersionHi:longint;
|
||||
|
||||
DefaultIniName:array[0..MAX_PATH-1] of char;
|
||||
|
||||
end;
|
||||
|
||||
pFsDefaultParamStruct=^tFsDefaultParamStruct;
|
||||
|
||||
{ callback functions }
|
||||
|
||||
type
|
||||
|
||||
TProgressProc=function(PluginNr:integer;SourceName,
|
||||
|
||||
TargetName:pchar;PercentDone:integer):integer; stdcall;
|
||||
|
||||
TLogProc=procedure(PluginNr,MsgType:integer;LogString:pchar); stdcall;
|
||||
|
||||
TRequestProc=function(PluginNr,RequestType:integer;CustomTitle,CustomText,
|
||||
|
||||
ReturnedText:pchar;maxlen:integer):boolean; stdcall;
|
||||
|
||||
{ Function prototypes - the callback functions MUST be implemented exactly like this! }
|
||||
|
||||
{
|
||||
|
||||
function FsInit(PluginNr:integer;pProgressProc:tProgressProc;pLogProc:tLogProc;
|
||||
|
||||
pRequestProc:tRequestProc):integer; stdcall;
|
||||
|
||||
function FsFindFirst(path :pchar;var FindData:tWIN32FINDDATA):thandle; stdcall;
|
||||
|
||||
function FsFindNext(Hdl:thandle;var FindData:tWIN32FINDDATA):bool; stdcall;
|
||||
|
||||
function FsFindClose(Hdl:thandle):integer; stdcall;
|
||||
|
||||
function FsMkDir(RemoteDir:pchar):bool; stdcall;
|
||||
|
||||
function FsExecuteFile(MainWin:thandle;RemoteName,Verb:pchar):integer; stdcall;
|
||||
|
||||
function FsRenMovFile(OldName,NewName:pchar;Move,OverWrite:bool;
|
||||
|
||||
RemoteInfo:pRemoteInfo):integer; stdcall;
|
||||
|
||||
function FsGetFile(RemoteName,LocalName:pchar;CopyFlags:integer;
|
||||
|
||||
RemoteInfo:pRemoteInfo):integer; stdcall;
|
||||
|
||||
function FsPutFile(LocalName,RemoteName:pchar;CopyFlags:integer):integer; stdcall;
|
||||
|
||||
function FsDeleteFile(RemoteName:pchar):bool; stdcall;
|
||||
|
||||
function FsRemoveDir(RemoteName:pchar):bool; stdcall;
|
||||
|
||||
function FsDisconnect(DisconnectRoot:pchar):bool; stdcall;
|
||||
|
||||
function FsSetAttr(RemoteName:pchar;NewAttr:integer):bool; stdcall;
|
||||
|
||||
function FsSetTime(RemoteName:pchar;CreationTime,LastAccessTime,
|
||||
|
||||
LastWriteTime:PFileTime):bool; stdcall;
|
||||
|
||||
procedure FsStatusInfo(RemoteDir:pchar;InfoStartEnd,InfoOperation:integer); stdcall;
|
||||
|
||||
procedure FsGetDefRootName(DefRootName:pchar;maxlen:integer); stdcall;
|
||||
|
||||
function FsExtractCustomIcon(RemoteName:pchar;ExtractFlags:integer;
|
||||
|
||||
var TheIcon:hicon):integer; stdcall;
|
||||
|
||||
procedure FsSetDefaultParams(dps:pFsDefaultParamStruct); stdcall;
|
||||
|
||||
function FsGetPreviewBitmap(RemoteName:pchar,width,height:integer,
|
||||
|
||||
var ReturnedBitmap:hbitmap):integer; stdcall;
|
||||
|
||||
function FsLinksToLocalFiles:bool; stdcall;
|
||||
|
||||
function FsGetLocalName(RemoteName:pchar;maxlen:integer):bool; stdcall;
|
||||
|
||||
}
|
||||
|
||||
{****************************** content plugin part *****************************}
|
||||
|
||||
const ft_nomorefields=0;
|
||||
|
||||
ft_numeric_32=1;
|
||||
|
||||
ft_numeric_64=2;
|
||||
|
||||
ft_numeric_floating=3;
|
||||
|
||||
ft_date=4;
|
||||
|
||||
ft_time=5;
|
||||
|
||||
ft_boolean=6;
|
||||
|
||||
ft_multiplechoice=7;
|
||||
|
||||
ft_string=8;
|
||||
|
||||
ft_fulltext=9;
|
||||
|
||||
ft_datetime=10;
|
||||
|
||||
// for ContentGetValue
|
||||
|
||||
ft_nosuchfield=-1;
|
||||
|
||||
ft_fileerror=-2;
|
||||
|
||||
ft_fieldempty=-3;
|
||||
|
||||
ft_ondemand=-4;
|
||||
|
||||
ft_delayed=0;
|
||||
|
||||
// for ContentSetValue
|
||||
|
||||
ft_setsuccess=0;
|
||||
|
||||
setflags_first_attribute=1; {First attribute of this file}
|
||||
|
||||
setflags_last_attribute=2;
|
||||
|
||||
setflags_only_date=4;
|
||||
|
||||
CONTENT_DELAYIFSLOW=1; // ContentGetValue called in foreground
|
||||
|
||||
type tContentDefaultParamStruct=record
|
||||
|
||||
size,
|
||||
|
||||
PluginInterfaceVersionLow,
|
||||
|
||||
PluginInterfaceVersionHi:longint;
|
||||
|
||||
DefaultIniName:array[0..MAX_PATH-1] of char;
|
||||
|
||||
end;
|
||||
|
||||
pContentDefaultParamStruct=^tContentDefaultParamStruct;
|
||||
|
||||
type tdateformat=record
|
||||
|
||||
wYear,wMonth,wDay:word;
|
||||
|
||||
end;
|
||||
|
||||
pdateformat=^tdateformat;
|
||||
|
||||
type ttimeformat=record
|
||||
|
||||
wHour,wMinute,wSecond:word;
|
||||
|
||||
end;
|
||||
|
||||
ptimeformat=^ttimeformat;
|
||||
|
||||
{ Function prototypes: }
|
||||
|
||||
{
|
||||
|
||||
procedure FsContentGetDetectString(DetectString:pchar;maxlen:integer); stdcall;
|
||||
|
||||
function FsContentGetSupportedField(FieldIndex:integer;FieldName:pchar;
|
||||
|
||||
Units:pchar;maxlen:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetValue(FileName:pchar;FieldIndex,UnitIndex:integer;FieldValue:pbyte;
|
||||
|
||||
maxlen,flags:integer):integer; stdcall;
|
||||
|
||||
procedure FsContentSetDefaultParams(dps:pContentDefaultParamStruct); stdcall;
|
||||
|
||||
procedure FsContentStopGetValue(FileName:pchar); stdcall;
|
||||
|
||||
function FsContentGetDefaultSortOrder(FieldIndex:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetSupportedFieldFlags(FieldIndex:integer):integer; stdcall;
|
||||
|
||||
function FsContentSetValue(FileName:pchar;FieldIndex,UnitIndex,FieldType:integer;
|
||||
|
||||
FieldValue:pbyte;flags:integer):integer; stdcall;
|
||||
|
||||
function FsContentGetDefaultView(ViewContents,ViewHeaders,ViewWidths,
|
||||
|
||||
ViewOptions:pchar;maxlen:integer):bool; stdcall;
|
||||
|
||||
}
|
||||
|
||||
implementation
|
||||
|
||||
end.
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@ unit ufsplugin; {Plugin definitions version 1.5}
|
|||
|
||||
interface
|
||||
|
||||
uses SysUtils, uOSUtils;
|
||||
uses SysUtils {$IFDEF WINDOWS}, Windows{$ENDIF};
|
||||
|
||||
{ ids for FsGetFile }
|
||||
|
||||
|
|
@ -155,42 +155,40 @@ const
|
|||
|
||||
type
|
||||
TInt64Rec = packed record
|
||||
case Boolean of
|
||||
True : (Value : Int64);
|
||||
False : (Low,High : DWORD);
|
||||
end;
|
||||
case Boolean of
|
||||
True : (Value : Int64);
|
||||
False : (Low,High : DWORD);
|
||||
end;
|
||||
|
||||
BOOL = LongBool;
|
||||
HBITMAP = THandle;
|
||||
HICON = THandle;
|
||||
|
||||
//---------------------
|
||||
bool =type boolean;
|
||||
HBITMAP = type LongWord;
|
||||
//---------------------
|
||||
|
||||
type
|
||||
{$ifdef UNICODE}
|
||||
TBYTE = word;
|
||||
TCHAR = widechar;
|
||||
BCHAR = word;
|
||||
{$else}
|
||||
TBYTE = byte;
|
||||
TCHAR = char;
|
||||
BCHAR = BYTE;
|
||||
{$endif}
|
||||
{$IFDEF WINDOWS}
|
||||
FILETIME = Windows.FILETIME;
|
||||
{$ELSE}
|
||||
FILETIME = record
|
||||
dwLowDateTime : DWORD;
|
||||
dwHighDateTime : DWORD;
|
||||
end;
|
||||
{$ENDIF}
|
||||
TFileTime = FILETIME;
|
||||
PFileTime = ^FILETIME;
|
||||
|
||||
WIN32_FIND_DATA = record
|
||||
dwFileAttributes : DWORD;
|
||||
ftCreationTime : TFILETIME;
|
||||
ftLastAccessTime : TFILETIME;
|
||||
ftLastWriteTime : TFILETIME;
|
||||
nFileSizeHigh : DWORD;
|
||||
nFileSizeLow : DWORD;
|
||||
dwReserved0 : DWORD;
|
||||
dwReserved1 : DWORD;
|
||||
cFileName : array[0..(MAX_PATH)-1] of TCHAR;
|
||||
cAlternateFileName : array[0..13] of TCHAR;
|
||||
end;
|
||||
tWIN32FINDDATA = WIN32_FIND_DATA;
|
||||
HICON = THANDLE;
|
||||
|
||||
dwFileAttributes : DWORD;
|
||||
ftCreationTime : TFILETIME;
|
||||
ftLastAccessTime : TFILETIME;
|
||||
ftLastWriteTime : TFILETIME;
|
||||
nFileSizeHigh : DWORD;
|
||||
nFileSizeLow : DWORD;
|
||||
dwReserved0 : DWORD;
|
||||
dwReserved1 : DWORD;
|
||||
cFileName : array[0..(MAX_PATH)-1] of CHAR;
|
||||
cAlternateFileName : array[0..13] of CHAR;
|
||||
end;
|
||||
TWin32FindData = WIN32_FIND_DATA;
|
||||
|
||||
type
|
||||
|
||||
|
|
|
|||
|
|
@ -75,10 +75,8 @@ type
|
|||
dwHighDateTime : DWORD;
|
||||
end;
|
||||
{$ENDIF}
|
||||
LPFILETIME = ^FILETIME;
|
||||
_FILETIME = FILETIME;
|
||||
TFILETIME = FILETIME;
|
||||
PFILETIME = ^FILETIME;
|
||||
TFileTime = FILETIME;
|
||||
PFileTime = ^FILETIME;
|
||||
|
||||
type
|
||||
TFileMapRec = record
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue