Archivado/Componentes.Terceros.Mustangpeak
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
778b05bf9f
Componentes.Terceros.Mustan.../official/1.7.0/Common Library/Source/MPDataObject.hpp
david 778b05bf9f Importación inicial 
- Mustangpeak Common Library - 1.7.0
  - EasyListview - 1.7.0

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.Mustangpeak@2 60b41242-d4b9-2247-b156-4ccd40706241
2007-09-11 08:33:06 +00:00

522 lines
20 KiB
C++
Raw Blame History

// CodeGear C++Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved
// (DO NOT EDIT: machine generated header) 'Mpdataobject.pas' rev: 11.00
#ifndef MpdataobjectHPP
#define MpdataobjectHPP
#pragma delphiheader begin
#pragma option push
#pragma option -w- // All warnings off
#pragma option -Vx // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp> // Pascal unit
#include <Sysinit.hpp> // Pascal unit
#include <Windows.hpp> // Pascal unit
#include <Messages.hpp> // Pascal unit
#include <Sysutils.hpp> // Pascal unit
#include <Classes.hpp> // Pascal unit
#include <Graphics.hpp> // Pascal unit
#include <Controls.hpp> // Pascal unit
#include <Forms.hpp> // Pascal unit
#include <Activex.hpp> // Pascal unit
#include <Shlobj.hpp> // Pascal unit
#include <Shellapi.hpp> // Pascal unit
#include <Mpshelltypes.hpp> // Pascal unit
#include <Mpcommonutilities.hpp> // Pascal unit
#include <Mpcommonobjects.hpp> // Pascal unit
#include <Axctrls.hpp> // Pascal unit
//-- user supplied -----------------------------------------------------------
namespace Mpdataobject
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TPerformedDropEffect { effectNone, effectCopy, effectMove, effectLink };
#pragma option pop
typedef TPerformedDropEffect *PPerformedDropEffect;
typedef DynamicArray<tagFORMATETC > TFormatEtcArray;
#pragma pack(push,4)
struct TDataObjectInfo
{
public:
tagFORMATETC FormatEtc;
tagSTGMEDIUM StgMedium;
bool OwnedByDataObject;
} ;
#pragma pack(pop)
typedef DynamicArray<TDataObjectInfo > TDataObjectInfoArray;
typedef tagFORMATETC TeltArray[256];
class DELPHICLASS TCommonEnumFormatEtc;
class PASCALIMPLEMENTATION TCommonEnumFormatEtc : public System::TInterfacedObject
{
typedef System::TInterfacedObject inherited;
private:
int FInternalIndex;
DynamicArray<tagFORMATETC > FFormats;
protected:
HRESULT __stdcall Next(int celt, /* out */ void *elt, PLongint pceltFetched);
HRESULT __stdcall Skip(int celt);
HRESULT __stdcall Reset(void);
HRESULT __stdcall Clone(/* out */ _di_IEnumFORMATETC &Enum);
__property int InternalIndex = {read=FInternalIndex, write=FInternalIndex, nodefault};
public:
__fastcall TCommonEnumFormatEtc(void);
__fastcall virtual ~TCommonEnumFormatEtc(void);
void __fastcall SetFormatLength(int Size);
__property TFormatEtcArray Formats = {read=FFormats, write=FFormats};
private:
void *__IEnumFORMATETC; /* IEnumFORMATETC */
public:
#if defined(MANAGED_INTERFACE_OPERATORS)
operator _di_IEnumFORMATETC()
{
_di_IEnumFORMATETC intf;
GetInterface(intf);
return intf;
}
#else
operator IEnumFORMATETC*(void) { return (IEnumFORMATETC*)&__IEnumFORMATETC; }
#endif
};
__interface ICommonDataObject;
typedef System::DelphiInterface<ICommonDataObject> _di_ICommonDataObject;
__interface INTERFACE_UUID("{F8B3EE47-C6C1-4FE3-9D94-757AA35DC038}") ICommonDataObject : public IDataObject
{
public:
virtual bool __fastcall AssignDragImage(Graphics::TBitmap* Image, const Types::TPoint &HotSpot, Graphics::TColor TransparentColor) = 0 ;
virtual bool __fastcall SaveGlobalBlock(Word Format, void * MemoryBlock, int MemoryBlockSize) = 0 ;
virtual bool __fastcall LoadGlobalBlock(Word Format, void * &MemoryBlock) = 0 ;
};
typedef void __fastcall (__closure *TGetDataEvent)(System::TObject* Sender, const tagFORMATETC &FormatEtcIn, tagSTGMEDIUM &Medium, bool &Handled);
typedef void __fastcall (__closure *TQueryGetDataEvent)(System::TObject* Sender, const tagFORMATETC &FormatEtcIn, bool &FormatAvailable, bool &Handled);
class DELPHICLASS TCommonDataObject;
class PASCALIMPLEMENTATION TCommonDataObject : public System::TObject
{
typedef System::TObject inherited;
private:
int FRefCount;
protected:
_di_IDataAdviseHolder FAdviseHolder;
DynamicArray<TDataObjectInfo > FFormats;
TGetDataEvent FOnGetData;
TQueryGetDataEvent FOnQueryGetData;
HRESULT __stdcall QueryInterface(const GUID &IID, /* out */ void *Obj);
int __stdcall _AddRef(void);
int __stdcall _Release(void);
System::_di_IInterface __fastcall CanonicalIUnknown(System::_di_IInterface TestUnknown);
virtual HRESULT __stdcall DAdvise(const tagFORMATETC &formatetc, int advf, const _di_IAdviseSink advSink, /* out */ int &dwConnection);
virtual HRESULT __stdcall DUnadvise(int dwConnection);
virtual HRESULT __stdcall EnumDAdvise(/* out */ _di_IEnumSTATDATA &enumAdvise);
virtual HRESULT __stdcall EnumFormatEtc(int dwDirection, /* out */ _di_IEnumFORMATETC &enumFormatEtc);
bool __fastcall EqualFormatEtc(const tagFORMATETC &FormatEtc1, const tagFORMATETC &FormatEtc2);
int __fastcall FindFormatEtc(const tagFORMATETC &TestFormatEtc);
virtual HRESULT __stdcall GetCanonicalFormatEtc(const tagFORMATETC &formatetc, /* out */ tagFORMATETC &formatetcOut);
virtual HRESULT __stdcall GetData(const tagFORMATETC &FormatEtcIn, /* out */ tagSTGMEDIUM &Medium);
virtual HRESULT __stdcall GetDataHere(const tagFORMATETC &formatetc, /* out */ tagSTGMEDIUM &medium);
unsigned __fastcall HGlobalClone(unsigned HGlobal);
virtual HRESULT __stdcall QueryGetData(const tagFORMATETC &formatetc);
virtual HRESULT __stdcall SetData(const tagFORMATETC &formatetc, tagSTGMEDIUM &medium, BOOL fRelease);
virtual void __fastcall DoGetCustomFormats(TFormatEtcArray &Formats);
virtual void __fastcall DoOnGetData(const tagFORMATETC &FormatEtcIn, tagSTGMEDIUM &Medium, bool &Handled);
virtual void __fastcall DoOnQueryGetData(const tagFORMATETC &FormatEtcIn, bool &FormatAvailable, bool &Handled);
HRESULT __fastcall RetrieveOwnedStgMedium(const tagFORMATETC &Format, tagSTGMEDIUM &StgMedium);
HRESULT __fastcall StgMediumIncRef(const tagSTGMEDIUM &InStgMedium, tagSTGMEDIUM &OutStgMedium, bool CopyInMedium);
System::TObject* __fastcall GetObj(void);
__property _di_IDataAdviseHolder AdviseHolder = {read=FAdviseHolder};
__property TDataObjectInfoArray Formats = {read=FFormats, write=FFormats};
__property System::TObject* Obj = {read=GetObj};
__property int RefCount = {read=FRefCount, nodefault};
public:
__fastcall TCommonDataObject(void);
__fastcall virtual ~TCommonDataObject(void);
virtual void __fastcall AfterConstruction(void);
virtual void __fastcall BeforeDestruction(void);
/* virtual class method */ virtual System::TObject* __fastcall NewInstance(TMetaClass* vmt);
bool __fastcall AssignDragImage(Graphics::TBitmap* Image, const Types::TPoint &HotSpot, Graphics::TColor TransparentColor);
virtual bool __fastcall GetUserData(const tagFORMATETC &Format, tagSTGMEDIUM &StgMedium);
bool __fastcall LoadGlobalBlock(Word Format, void * &MemoryBlock);
bool __fastcall SaveGlobalBlock(Word Format, void * MemoryBlock, int MemoryBlockSize);
__property TGetDataEvent OnGetData = {read=FOnGetData, write=FOnGetData};
__property TQueryGetDataEvent OnQueryGetData = {read=FOnQueryGetData, write=FOnQueryGetData};
private:
void *__ICommonExtractObj; /* Mpcommonobjects::ICommonExtractObj */
void *__ICommonDataObject; /* Mpdataobject::ICommonDataObject */
public:
#if defined(MANAGED_INTERFACE_OPERATORS)
operator Mpcommonobjects::_di_ICommonExtractObj()
{
Mpcommonobjects::_di_ICommonExtractObj intf;
GetInterface(intf);
return intf;
}
#else
operator ICommonExtractObj*(void) { return (ICommonExtractObj*)&__ICommonExtractObj; }
#endif
#if defined(MANAGED_INTERFACE_OPERATORS)
operator _di_ICommonDataObject()
{
_di_ICommonDataObject intf;
GetInterface(intf);
return intf;
}
#else
operator ICommonDataObject*(void) { return (ICommonDataObject*)&__ICommonDataObject; }
#endif
#if defined(MANAGED_INTERFACE_OPERATORS)
operator _di_IDataObject()
{
_di_IDataObject intf;
GetInterface(intf);
return intf;
}
#else
operator IDataObject*(void) { return (IDataObject*)&__ICommonDataObject; }
#endif
#if defined(MANAGED_INTERFACE_OPERATORS)
operator System::_di_IInterface()
{
System::_di_IInterface intf;
GetInterface(intf);
return intf;
}
#else
operator IInterface*(void) { return (IInterface*)&__ICommonExtractObj; }
#endif
};
class DELPHICLASS TCommonClipboardFormat;
class PASCALIMPLEMENTATION TCommonClipboardFormat : public System::TObject
{
typedef System::TObject inherited;
public:
virtual tagFORMATETC __fastcall GetFormatEtc();
virtual bool __fastcall LoadFromClipboard(void);
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject) = 0 ;
virtual bool __fastcall SaveToClipboard(void);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject) = 0 ;
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonClipboardFormat(void) : System::TObject() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCommonClipboardFormat(void) { }
#pragma option pop
};
class DELPHICLASS TCommonStreamClipFormat;
class PASCALIMPLEMENTATION TCommonStreamClipFormat : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
public:
virtual tagFORMATETC __fastcall GetFormatEtc();
virtual bool __fastcall LoadFromClipboard(void);
HIDESBASE bool __fastcall LoadFromDataObject(_di_IDataObject DataObject, Mpcommonobjects::TCommonStream* CoolStream);
virtual bool __fastcall SaveToClipboard(void);
HIDESBASE bool __fastcall SaveToDataObject(_di_IDataObject DataObject, Mpcommonobjects::TCommonStream* CoolStream);
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonStreamClipFormat(void) : TCommonClipboardFormat() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCommonStreamClipFormat(void) { }
#pragma option pop
};
typedef DynamicArray<_FILEDESCRIPTORA > TDescriptorAArray;
typedef DynamicArray<_FILEDESCRIPTORW > TDescriptorWArray;
class DELPHICLASS TFileGroupDescriptorA;
class PASCALIMPLEMENTATION TFileGroupDescriptorA : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
Classes::TStream* FStream;
int __fastcall GetDescriptorCount(void);
_FILEDESCRIPTORA __fastcall GetFileDescriptorA(int Index);
void __fastcall SetFileDescriptor(int Index, const _FILEDESCRIPTORA &Value);
protected:
DynamicArray<_FILEDESCRIPTORA > FFileDescriptors;
__property Classes::TStream* Stream = {read=FStream, write=FStream};
public:
void __fastcall AddFileDescriptor(const _FILEDESCRIPTORA &FileDescriptor);
void __fastcall DeleteFileDescriptor(int Index);
virtual tagFORMATETC __fastcall GetFormatEtc();
_FILEDESCRIPTORA __fastcall FillDescriptor(AnsiString FileName);
Classes::TStream* __fastcall GetFileStream(const _di_IDataObject DataObject, int FileIndex);
void __fastcall LoadFileGroupDestriptor(Shlobj::PFileGroupDescriptorA FileGroupDiscriptor);
virtual bool __fastcall LoadFromClipboard(void);
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
virtual bool __fastcall SaveToClipboard(void);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property int DescriptorCount = {read=GetDescriptorCount, nodefault};
__property _FILEDESCRIPTORA FileDescriptor[int Index] = {read=GetFileDescriptorA, write=SetFileDescriptor};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TFileGroupDescriptorA(void) : TCommonClipboardFormat() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TFileGroupDescriptorA(void) { }
#pragma option pop
};
class DELPHICLASS TFileGroupDescriptorW;
class PASCALIMPLEMENTATION TFileGroupDescriptorW : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
Classes::TStream* FStream;
int __fastcall GetDescriptorCount(void);
_FILEDESCRIPTORW __fastcall GetFileDescriptorW(int Index);
void __fastcall SetFileDescriptor(int Index, const _FILEDESCRIPTORW &Value);
protected:
DynamicArray<_FILEDESCRIPTORW > FFileDescriptors;
__property Classes::TStream* Stream = {read=FStream, write=FStream};
public:
void __fastcall AddFileDescriptor(const _FILEDESCRIPTORW &FileDescriptor);
void __fastcall DeleteFileDescriptor(int Index);
_FILEDESCRIPTORW __fastcall FillDescriptor(WideString FileName);
Classes::TStream* __fastcall GetFileStream(const _di_IDataObject DataObject, int FileIndex);
virtual tagFORMATETC __fastcall GetFormatEtc();
void __fastcall LoadFileGroupDestriptor(Shlobj::PFileGroupDescriptorW FileGroupDiscriptor);
virtual bool __fastcall LoadFromClipboard(void);
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
virtual bool __fastcall SaveToClipboard(void);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property int DescriptorCount = {read=GetDescriptorCount, nodefault};
__property _FILEDESCRIPTORW FileDescriptor[int Index] = {read=GetFileDescriptorW, write=SetFileDescriptor};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TFileGroupDescriptorW(void) : TCommonClipboardFormat() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TFileGroupDescriptorW(void) { }
#pragma option pop
};
class DELPHICLASS TCommonHDrop;
class PASCALIMPLEMENTATION TCommonHDrop : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
void __fastcall SetDropFiles(const Shlobj::PDropFiles Value);
unsigned __fastcall GetHDropStruct(void);
protected:
_DROPFILES *FDropFiles;
int FStructureSize;
int FFileCount;
void __fastcall AllocStructure(int Size);
int __fastcall CalculateDropFileStructureSizeA(Shlobj::PDropFiles Value);
int __fastcall CalculateDropFileStructureSizeW(Shlobj::PDropFiles Value);
int __fastcall FileCountA(void);
int __fastcall FileCountW(void);
AnsiString __fastcall FileNameA(int Index);
WideString __fastcall FileNameW(int Index);
void __fastcall FreeStructure(void);
public:
__fastcall virtual ~TCommonHDrop(void);
bool __fastcall AssignFromClipboard(void);
virtual bool __fastcall LoadFromClipboard(void);
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
int __fastcall FileCount(void);
WideString __fastcall FileName(int Index);
virtual tagFORMATETC __fastcall GetFormatEtc();
void __fastcall AssignFilesA(Classes::TStringList* FileList);
void __fastcall FileNamesA(Classes::TStrings* FileList);
__property unsigned HDropStruct = {read=GetHDropStruct, nodefault};
virtual bool __fastcall SaveToClipboard(void);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property int StructureSize = {read=FStructureSize, nodefault};
__property Shlobj::PDropFiles DropFiles = {read=FDropFiles, write=SetDropFiles};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonHDrop(void) : TCommonClipboardFormat() { }
#pragma option pop
};
class DELPHICLASS TCommonShellIDList;
class PASCALIMPLEMENTATION TCommonShellIDList : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
_IDA *FCIDA;
int __fastcall GetCIDASize(void);
Shlobj::PItemIDList __fastcall InternalChildPIDL(int Index);
Shlobj::PItemIDList __fastcall InternalParentPIDL(void);
void __fastcall SetCIDA(const Shlobj::PIDA Value);
public:
Shlobj::PItemIDList __fastcall AbsolutePIDL(int Index);
void __fastcall AbsolutePIDLs(Mpcommonobjects::TCommonPIDLList* APIDLList);
void __fastcall AssignPIDLs(Mpcommonobjects::TCommonPIDLList* APIDLList);
__fastcall virtual ~TCommonShellIDList(void);
virtual tagFORMATETC __fastcall GetFormatEtc();
virtual bool __fastcall LoadFromClipboard(void);
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
Shlobj::PItemIDList __fastcall ParentPIDL(void);
int __fastcall PIDLCount(void);
Shlobj::PItemIDList __fastcall RelativePIDL(int Index);
void __fastcall RelativePIDLs(Mpcommonobjects::TCommonPIDLList* APIDLList);
virtual bool __fastcall SaveToClipboard(void);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property Shlobj::PIDA CIDA = {read=FCIDA, write=SetCIDA};
__property int CIDASize = {read=GetCIDASize, nodefault};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonShellIDList(void) : TCommonClipboardFormat() { }
#pragma option pop
};
class DELPHICLASS TCommonLogicalPerformedDropEffect;
class PASCALIMPLEMENTATION TCommonLogicalPerformedDropEffect : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
TPerformedDropEffect FAction;
public:
virtual tagFORMATETC __fastcall GetFormatEtc();
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property TPerformedDropEffect Action = {read=FAction, write=FAction, nodefault};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonLogicalPerformedDropEffect(void) : TCommonClipboardFormat() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCommonLogicalPerformedDropEffect(void) { }
#pragma option pop
};
class DELPHICLASS TCommonPreferredDropEffect;
class PASCALIMPLEMENTATION TCommonPreferredDropEffect : public TCommonLogicalPerformedDropEffect
{
typedef TCommonLogicalPerformedDropEffect inherited;
public:
virtual tagFORMATETC __fastcall GetFormatEtc();
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonPreferredDropEffect(void) : TCommonLogicalPerformedDropEffect() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCommonPreferredDropEffect(void) { }
#pragma option pop
};
class DELPHICLASS TCommonInShellDragLoop;
class PASCALIMPLEMENTATION TCommonInShellDragLoop : public TCommonClipboardFormat
{
typedef TCommonClipboardFormat inherited;
private:
unsigned FData;
public:
virtual tagFORMATETC __fastcall GetFormatEtc();
virtual bool __fastcall LoadFromDataObject(_di_IDataObject DataObject);
virtual bool __fastcall SaveToDataObject(_di_IDataObject DataObject);
__property unsigned Data = {read=FData, write=FData, nodefault};
public:
#pragma option push -w-inl
/* TObject.Create */ inline __fastcall TCommonInShellDragLoop(void) : TCommonClipboardFormat() { }
#pragma option pop
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCommonInShellDragLoop(void) { }
#pragma option pop
};
//-- var, const, procedure ---------------------------------------------------
#define CFSTR_LOGICALPERFORMEDDROPEFFECT "Logical Performed DropEffect"
#define CFSTR_PREFERREDDROPEFFECT "Preferred DropEffect"
#define CFSTR_PERFORMEDDROPEFFECT "Performed DropEffect"
#define CFSTR_PASTESUCCEEDED "Paste Succeeded"
#define CFSTR_INDRAGLOOP "InShellDragLoop"
#define CFSTR_SHELLIDLISTOFFSET "Shell Object Offsets"
static const Shortint SIZE_SHELLDRAGLOOPDATA = 0x4;
extern PACKAGE Word CF_SHELLIDLIST;
extern PACKAGE Word CF_PERFORMEDDROPEFFECT;
extern PACKAGE Word CF_PASTESUCCEEDED;
extern PACKAGE Word CF_INDRAGLOOP;
extern PACKAGE Word CF_SHELLIDLISTOFFSET;
extern PACKAGE Word CF_LOGICALPERFORMEDDROPEFFECT;
extern PACKAGE Word CF_PREFERREDDROPEFFECT;
extern PACKAGE Word CF_FILECONTENTS;
extern PACKAGE Word CF_FILEDESCRIPTORA;
extern PACKAGE Word CF_FILEDESCRIPTORW;
extern PACKAGE bool __fastcall DataObjectContainsPIDL(Shlobj::PItemIDList APIDL, const _di_IDataObject DataObj);
extern PACKAGE bool __fastcall DataObjectSupportsShell(const _di_IDataObject DataObj);
extern PACKAGE tagFORMATETC __fastcall HDropFormat();
extern PACKAGE tagFORMATETC __fastcall ShellIDListFormat();
extern PACKAGE tagFORMATETC __fastcall FileDescriptorAFormat();
extern PACKAGE tagFORMATETC __fastcall FileDescriptorWFormat();
extern PACKAGE tagFORMATETC __fastcall FillFormatEtc(Word cfFormat, Activex::PDVTargetDevice ptd = (void *)(0x0), int dwAspect = 0x1, int lindex = 0xffffffff, int tymed = 0x1);
} /* namespace Mpdataobject */
using namespace Mpdataobject;
#pragma pack(pop)
#pragma option pop
#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif // Mpdataobject
Reference in New Issue View Git Blame Copy Permalink