Re[6]: [fpc-pascal] TAP-Win32

2010-05-14 Thread José Mejuto
Hello FPC-Pascal, Friday, May 14, 2010, 1:34:08 PM, you wrote: JAGdFJ> i am able to receive packets setting up a tap device with a fixed ip JAGdFJ> and doing ping to the gateway address... JAGdFJ> now i need to decipher the ioctl calls... Sorry, I can not help more, I had never used TAP and even

Re: Re[4]: [fpc-pascal] TAP-Win32

2010-05-14 Thread Jorge Aldo G. de F. Junior
Uses Windows, Classes, BlckSock; Const TAP_Device = '\\.\Global\{44F7688F-77FA-43DC-8D8F-9CBA23E01BB0}.tap'#00; TAP_Buffer = 8192; Var Handle : Integer; Buffer : Pointer; Stream : THandleStream; Count : Integer; Beg

Re[4]: [fpc-pascal] TAP-Win32

2010-05-13 Thread José Mejuto
Hello FPC-Pascal, Friday, May 14, 2010, 12:14:31 AM, you wrote: JAGdFJ> This is the C# example i found : JAGdFJ> http://www.varsanofiev.com/inside/TunTest.cs Also this line is wrong IMHO: TAP_Device = '.\\Global\\{44F7688F-77FA-43DC-8D8F-9CBA23E01BB0}.tap'; it should be: TAP_Device = '\\.

Re: Re[2]: [fpc-pascal] TAP-Win32

2010-05-13 Thread Jorge Aldo G. de F. Junior
This is the C# example i found : http://www.varsanofiev.com/inside/TunTest.cs 2010/5/13 Jorge Aldo G. de F. Junior : > handle still returns -1 > > 2010/5/13 José Mejuto : >> Hello FPC-Pascal, >> >> Thursday, May 13, 2010, 10:42:37 PM, you wrote: >> >> JAGdFJ>         Handle := CreateFile(PChar(TA

Re: Re[2]: [fpc-pascal] TAP-Win32

2010-05-13 Thread Jorge Aldo G. de F. Junior
handle still returns -1 2010/5/13 José Mejuto : > Hello FPC-Pascal, > > Thursday, May 13, 2010, 10:42:37 PM, you wrote: > > JAGdFJ>         Handle := CreateFile(PChar(TAP_Device), GENERIC_READ Or > JAGdFJ> GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM Or > JAGdFJ> FILE_FLAG_OVERLAPPED,

Re[2]: [fpc-pascal] TAP-Win32

2010-05-13 Thread José Mejuto
Hello FPC-Pascal, Thursday, May 13, 2010, 10:42:37 PM, you wrote: JAGdFJ> Handle := CreateFile(PChar(TAP_Device), GENERIC_READ Or JAGdFJ> GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_SYSTEM Or JAGdFJ> FILE_FLAG_OVERLAPPED, 0); Try using: Handle:=CreateFileA(PChar(TAP_Device), GENE

Re: [fpc-pascal] TAP-Win32

2010-05-13 Thread Jorge Aldo G. de F. Junior
TAP-Win32 is the win32 equivalent of linux/unix tun tap devices. i need to: - discover installed taps - set device options (Dont need ip and etc, just the basic ioctls) - read and write to device (after set up it becomes just a simple file) i tried this : Uses Windows, Classes; Const TA

Re: [fpc-pascal] TAP-Win32

2010-05-13 Thread Marc Weustink
Felipe Monteiro de Carvalho wrote: What does TAP stand for? see http://en.wikipedia.org/wiki/TUN/TAP for some pointers. Marc ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Re: [fpc-pascal] TAP-Win32

2010-05-13 Thread Felipe Monteiro de Carvalho
What does TAP stand for? -- Felipe Monteiro de Carvalho ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal

[fpc-pascal] TAP-Win32

2010-05-13 Thread Jorge Aldo G. de F. Junior
Anyone knows how to use it from pascal ? I am even willing to pay for a component that simplifies TAP-win32 use. ___ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal