Igor Pechtchanski schrieb:
On Sun, 6 Feb 2005, Reini Urban wrote:
I feel quite stupid now, but found nothing simple.
How to get the winpid from the current process in cygwin's perl?
$$ is the cygwin pid which is different from the windows pid
GetCurrentProcessId().
winpid = cygwin_int
Gerrit P. Haase schrieb:
Yitzchak Scott-Thoennes wrote:
On Mon, Feb 07, 2005 at 02:17:32PM +0100, Reini Urban wrote:
Igor Pechtchanski schrieb:
On Sun, 6 Feb 2005, Reini Urban wrote:
I feel quite stupid now, but found nothing simple.
How to get the winpid from the current process in cygwin's
Reini Urban schrieb:
Gerrit P. Haase schrieb:
Yitzchak Scott-Thoennes wrote:
On Mon, Feb 07, 2005 at 02:17:32PM +0100, Reini Urban wrote:
Igor Pechtchanski schrieb:
On Sun, 6 Feb 2005, Reini Urban wrote:
I feel quite stupid now, but found nothing simple.
How to get the winpid from the current
not create a separate module for this.
If p5p will accept it :)
--
Reini Urban
hould work on mingw, MSVC and Borland also. But on my own tests
(MSVC-6SP2) I found some minor problems with missing MSVC includes.
I'll try to clean that up in the next weeks.
--
Reini Urban
http://xarch.tu-graz.ac.at/home/rurban/
[I'm on the list]
Jan Dubois schrieb:
On Tue, 15 Feb 2005, Reini Urban wrote:
I have a huge cygwin patch pending, based on rafael kitover's cygwin
work, simplifying the hints (one central hints file for all), some
missing functions centrally defined, and one huge central headerfile.
these files and use standard XS
ExtUtils::Constant's
This will affect Win32API::File and Win32API::Registry
and will not need Schwern's new ExtUtils::MakeMaker v6.26 then to fix
our (cygwin) pending ps_to_blib hacks.
--
Reini Urban
http://xarch.tu-graz.ac.at/home/rurban
http://phpwiki.org
me.
Why should he write to you?
Please just post the patch where it belongs to, to the tracker, and
everybody can pick it up there then.
http://rt.cpan.org/NoAuth/Bugs.html?Dist=libwin32
Please be sure to check for compilers other than MSVC6 also.
(borland, gcc)
--
Reini Urban
http://xarch.tu
Reinhard Pagitsch schrieb:
Hello Reini,
Reini Urban wrote:
Reinhard Pagitsch schrieb:
Hello Jan,
(I just posted this to clpm and Rob told me that it is better to post
it in this mailing list)
I downloaded your module to my WindowsXP system, because I needed the
Win32::Process
module and the
anism.
This is really exciting news! Thanks a lot!
I just posted the updated cygwin package to be available via
http://cygwin.com/setup.exe
I just had a minor issue when iodbc is used instead of the MSVC ODBC
headers. See https://rt.cpan.org/NoAuth/Bug.html?id=14634
--
Reini Urban
http://phpwiki.org/
Jan Dubois schrieb:
On Sun, 18 Sep 2005, Reini Urban wrote:
I just posted the updated cygwin package to be available via
http://cygwin.com/setup.exe
Thanks!
I just had a minor issue when iodbc is used instead of the MSVC ODBC
headers. See https://rt.cpan.org/NoAuth/Bug.html?id=14634
I
Reini Urban schrieb:
Jan Dubois schrieb:
On Sun, 18 Sep 2005, Reini Urban wrote:
I just had a minor issue when iodbc is used instead of the MSVC ODBC
headers. See https://rt.cpan.org/NoAuth/Bug.html?id=14634
I notice you only changed the #includes in ODBC.xs. I assume the same
change should
Jan Dubois schrieb:
I did integrate the experimental tied handle interface from the CYGWIN
patch by Rafael Kitover and Reini Urban into Win32API::File for
libwin32-0.26. This patch was needed because CYGWIN doesn't have any
support for OsFHandleOpenFd(), and the tied interface allows to
em
Jan Dubois schrieb:
On Tue, 20 Sep 2005, Reini Urban wrote:
Oh sorry! I've added it to the cygwin distro, but will remove it then
and add this interface to the upcoming Win32::TieFile package.
Ok with me.
Just to make sure we don't duplicate work: Do you want to create the
Win3
Jan Dubois schrieb:
On Tue, 20 Sep 2005, Reini Urban wrote:
Jan Dubois schrieb:
Just to make sure we don't duplicate work: Do you want to create the
Win32::TieFile module yourself, or should I refactor it? I would
still put in Rafael and you as the authors, of course.
I'm jus
critical, or really override test_via_harness()
My preference would be to see this undesirable behaviour in relation to
bundles fixed - but that's not really an *on-topic* issue for this group.
--
Reini Urban
http://phpwiki.org/
archlib.
Why do we want the CORE part of Win32 being renamed to Win32?
--
Reini Urban - libwin32 cygwin maintainer
nfo);
>
> if ($handle == INVALID_HANDLE_VALUE) {
> printf "Error is %d - %s\n", Win32::GetLastError (),
> Win32::FormatMessage (Win32::GetLastError ());
> exit(1);
> } else {
> print "FindFirstFile worked\n";
>
> Dump $FileInfo->{cFileName};
> #print Data::Dumper-> Dump([$FileInfo], [qw($FileInfo)]);
>
> my $ufn = Unicode::String->new;
> $ufn->utf16le($FileInfo->{cFileName});
>
> print "first filename = ", $ufn->as_string, "\n";
> print "first filename = '", $FileInfo->{cFileName}, "'\n";
> #print "first filename = ", decode("UTF-16LE", $FileInfo->{cFileName}
> ), "\n";
> while (my $result = $FindNextFile->Call($handle,$FileInfo)) {
> Dump $FileInfo->{cFileName};
> $ufn->utf16le($FileInfo->{cFileName});
> print "next filename = ", $ufn->as_string, "\n";
> print "next filename = '", $FileInfo->{cFileName}, "'\n";
> #print "next filename = ", decode("UTF-16LE",
> $FileInfo->{cFileName}
> ), "\n";
> #print Data::Dumper-> Dump([$FileInfo], [qw($FileInfo)]);
>
> }
> }
>
> $FindClose->Call($handle) or die "FindClose $^E";
--
Reini Urban
http://phpwiki.org/
http://spacemovie.mur.at/
ndle *NIX specific counterparts so why should
> Win32 be left out?)
Ok for all (esp. Win32API:: and IPC).
But not Win32::TieRegistry please!
This is very high-level and pollutes the namespace with a magic global.
--
Reini Urban
http://phpwiki.org/
http://spacemovie.mur.at/ http://helsinki.at/
2006/1/31, demerphq <[EMAIL PROTECTED]>:
> On 1/31/06, Reini Urban <[EMAIL PROTECTED]> wrote:
> > 2006/1/31, demerphq <[EMAIL PROTECTED]>:
> > > IMO we should be bundling some of the base modules from the libwin
> > > distro in core. Win32API::File
ror being retrieved
$^E = 42;
is(Win32::GetLastError(), 42, 'GetLastError() works on the first call');
For this testcase on cygwin I would rather check that
Win32::GetLastError() is not affected by setting $! or $^E.
But on cygwin $EXTENDED_OS_ERROR shoul
> Can't test without successful make
> Running make install
> Make had returned bad status, install seems impossible
Delete the yaml and try again.
Also try to make it in a seperate shell.
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
be - possible a quoting problem.
As I reproduced it it is:
4860 FF5598 call *-104(%ebp)
4863 fstpl 0.0
Which should be fstpl %st(0)
reproducable with (see "man as")
$ make CCCDLFLAGS=-Wa,-alhms,-Z > api.asm
See my reply and patch to the ticket please.
, i.e. 1 perl makefile.pl + 3 makes. The make
> process failed.
>
> Please let me know if you need more information.
You miss libODBC. I'll propose such a package to cygwin, I've forgot it.
You can also use the official pre.packaged perl-libwin32 package. It's
linked statically
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
2010/9/8 Reini Urban :
> I'll check if I see something wrong how callbacks (T_CODE)
> are handled in API.xs
> But I rather believe the user callback sub is just wrong.
> You have to debug into the perl-side of the callback.
In my app the Ctrl-C or Ctrl-Break signal is never ge
cks (T_CODE)
are handled in API.xs
But I rather believe the user callback sub is just wrong.
You have to debug into the perl-side of the callback.
--
Reini Urban
perl -Mblib -MData::Dumper -MWin32::OLE -le 'print
Dumper(Win32::OLE->new("ADODB.Connection"))'
$VAR1 = undef;
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
'Count' => 0,
'Item' => undef
}, 'Win32::OLE' ),
'DefaultDatabase' => undef,
'IsolationLevel' => 4096,
'Attri
...
Wrong test, cygwin-1.7 does unicode paths not just ascii.
attached is my core patch from cygwin branch on github
--
Reini Urban
diff --git a/cpan/Win32/t/Unicode.t b/cpan/Win32/t/Unicode.t
index 3570142..7ab8a6f 100644
--- a/cpan/Win32/t/Unicode.t
+++ b/cpan/Win32/t/Unicode.t
@@ -1,6 +1,7 @@
u
t; ok(opendir(my $dh, Win32::GetANSIPathName($dir)));
> while ($_ = readdir($dh)) {
> next if /^\./;
> + Encode::_utf8_on($_) if $^O eq "cygwin";
> ok($file, Win32::GetLongPathName("$dir\\$_"));
> }
> closedir($dh);
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
Am 01.02.2012 um 11:00 schrieb Cosimo Streppone:
> This is RT#74578 about Win32::API structs packing/unpacking.
> Can you help us?
>
> --- Forwarded message ---
> From: "Douglas Wilson via RT"
> Subject: [rt.cpan.org #74578] Win32::API::Struct not aligned on 64 bit
> Date: Wed, 01 Feb 20
wrong. It
>> >
>> > I mean Win32::API::Struct::getUnpack. Sorry for the confusion.
>>
>> I have a patch for this pack/unpack issue (the align is still off).
>
> Grr, the second "my $repeat" in the patch should just be "$repeat". No
> more free to wrong pool error. Still have same old align problem.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
10-8000-00AA006D2EA4})
>> > has library path as %CommonProgramFiles(x86)%\System\ado\msado15.dll
>> > while under XP the ADODO.Connection registry key has its library as
>> > C:\Program Files (x86)\Common Files\System\ado\msado15.dll.
>&g
2Node\CLSID\{0514--0010-8000-00AA006D2EA4})
>> > has library path as %CommonProgramFiles(x86)%\System\ado\msado15.dll
>> > while under XP the ADODO.Connection registry key has its library as
>> > C:\Program Files (x86)\Common Files\System\ado\msado15.dll.
>> >
>> > On my Windows 7 machine, I have tried changing the directory path to from
>> > %CommonProgramFiles(x86)% to C:\Program Files (x86)\Common Files in the
>> > aforementioned registry key and now Win32::OLE->new('ADODB.Connection')
>> > works, albeit opening a DB connection would require a whole host of other
>> > similar registry changes (I do not recommend this, I just did it as a
>> > test).
>> >
>> > I am hoping that someone knows how to fix this or knows a workaround?
>> >
>> > Best regards,
>> >
>> > Chris.
>> >
>> > --
>> > Problem reports: http://cygwin.com/problems.html
>> > FAQ: http://cygwin.com/faq/
>> > Documentation: http://cygwin.com/docs.html
>> > Unsubscribe info: http://cygwin.com/ml/#unsubscribe-simple
>> >
>>
>
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
Win32__API_Call (my_perl=0x200393c8, cv=0x202d8150) at API.c:866
866 params[i].t = T_NUMBER;
(gdb) bt
#0 XS_Win32__API_Call (my_perl=0x200393c8, cv=0x202d8150) at API.c:866
(gdb) p i
$1 = 0
(gdb) p params[i]
$2 = {{b = 0x8bdc4589 , c = -119
'\211', s = 17801,
p =
Non-zero exit status: 255
Parse errors: Bad plan. You planned 36 tests but ran 29.
t/v71.t (Wstat: 65280 Tests: 5 Failed: 0)
Non-zero exit status: 255
Parse errors: Bad plan. You planned 23 tests but ran 5.
Files=13, Tests=159, 9 wallclock secs ( 0.03 usr 0.11 sys + 3.70
cusr 5.51 csys = 9.35 CPU)
Result: FAIL
Failed 5/13 test programs. 2/159 subtests failed.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
and. Probably next week. If you want
>> to research it yourself, there should be enough info above
>> for you to do it. RtlCaptureContext is what I would be
>> using for debugging and printf dumping all 8 bytes of
>> CBRETVAL * retval in PerlCallback in Callback.xs every
>> time PerlCallback is called.
>
> I am adding the above to the bug report for tracking
> purposes.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\nA\202\0\0\0\0\0\0\0\0\0\0\0\0\0
\224\32a\303\0\0\0
\224\32a\343z\0a\0\0\0\0\0\0\0\0<\246\"\0\234\226\"\0x\227\"\0\1\0\0\0\1\0\0\0\0\1\0\0\270\201\2
\30\230\"\0\@\225\"\0q\230\na#\0;\0\0\0#\0D\377\"\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0";
$ cmp gc-non-thr.xx gc-thr.xx
gc-non-thr.xx gc-thr.xx differ: byte 107, line 1
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
ectory
> C:\strawberry\cpan\build\Win32-Process-0.14-5utvDj
> Could not make: Unknown error
> Running make test
> Can't test without successful make
> Running make install
> Make had returned bad status, install seems impossible
Delete the yaml and try again.
Also try to make it in a seperate shell.
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
ake.EXE: Error code 129, while making 'API.o'
>
> and installation aborts...
Confirmed with cygwin gcc-4.3 also
gcc-4 (GCC) 4.3.2 20080827 (beta) 2
{standard input}: Assembler messages:
{standard input}:4863: Error: junk `.0' after expression
make: *** [API.o] Error 1
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
OSIMO
Requestors: valko...@gmail.com
Status: open
Ticket https://rt.cpan.org/Ticket/Display.html?id=47398 >
2009/6/28 Reini Urban :
> 2009/6/28 Reini Urban :
>> Confirmed with cygwin gcc-4.3 also
>> gcc-4 (GCC) 4.3.2 20080827 (beta) 2
>>
>> {standard input}: Ass
OSIMO
Requestors: valko...@gmail.com
Status: open
Ticket https://rt.cpan.org/Ticket/Display.html?id=47398 >
2009/6/28 Reini Urban :
> Confirmed with cygwin gcc-4.3 also
> gcc-4 (GCC) 4.3.2 20080827 (beta) 2
>
> {standard input}: Assembler messages:
> {standard input}:4863:
t.
You can also use the official pre.packaged perl-libwin32 package. It's
linked statically
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
...@mail.bg
Status: open
Ticket https://rt.cpan.org/Ticket/Display.html?id=53914 >
2010/9/8 Reini Urban :
> I'll check if I see something wrong how callbacks (T_CODE)
> are handled in API.xs
> But I rather believe the user callback sub is just wrong.
> You have to debu
onvention,
CALLBACK is not using cdecl.
I'll check if I see something wrong how callbacks (T_CODE)
are handled in API.xs
But I rather believe the user callback sub is just wrong.
You have to debug into the perl-side of the callback.
--
Reini Urban
"ADODB.Connection"))'
> $VAR1 = undef;
On 32-bit Windows XP also.
All tests pass, but:
$ perl -Mblib -MData::Dumper -MWin32::OLE -le 'print
Dumper(Win32::OLE->new("ADODB.Connection"))'
$VAR1 = undef;
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
; => undef,
'IsolationLevel' => 4096,
'Attributes' => 0,
'CursorLocation' => 2,
'Mode' => 0,
'Provider' => 'MSDASQL.1',
'State' => 0
}, 'Win32::OLE' );
> Also, which Cygwin version are you using? Your example works fine
> with my (obsolete) Cygwin 1.5 install.
Latest 1.7.8 with my official perl
--
Reini Urban
http://phpwiki.org/ http://murbreak.at/
is: ok($file,
> Win32::GetLongPathName("$dir\\$_"));
> t/Unicode.t ...
Wrong test, cygwin-1.7 does unicode paths not just ascii.
attached is my core patch from cygwin branch on github
--
Reini Urban
diff --git a/cpan/Win32/t/Unicode.t b/cpan/Win32/t/Unicode.t
index 3
code;
> use Cwd qw(cwd);
> use Win32;
>
> @@ -48,6 +49,7 @@
> ok(opendir(my $dh, Win32::GetANSIPathName($dir)));
> while ($_ = readdir($dh)) {
> next if /^\./;
> + Encode::_utf8_on($_) if $^O eq "cygwin";
> ok($file, Win32::GetLongPathName("$dir\\$
Thu Feb 02 11:55:59 2012: Request 74578 was acted upon.
Transaction: Correspondence added by rur...@cpanel.net
Queue: Win32-API
Subject: Re: [rt.cpan.org #74578] Win32::API::Struct not aligned on 64 bit
Broken in: 0.64
Severity: Normal
Owner: Nobody
Requestors: do...@cp
quot;my $repeat" in the patch should just be "$repeat". No
> more free to wrong pool error. Still have same old align problem.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
Ticket https://rt.cpan.org/Ticket/Display.html?id=65052 >
Second patch attached, for the preferred version to copy the whole ENV
when someones requests use Win32.
We don't want the full ENV in pure cygwin, only on use Win32.
--
Reini Urban
>From 043609d47bfadc9ff3000f77df24d4dc891739d6
i
$1 = 0
(gdb) p params[i]
$2 = {{b = 0x8bdc4589 , c = -119
'\211', s = 17801,
p = 0x8bdc4589 , l = 2346468745,
f = -8.48455424e-32, d = -626.03395816886143,
q = -4574654168104680055}, t = 1 '\001'}
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
test: 2
Non-zero exit status: 1
t/v69.t (Wstat: 65280 Tests: 29 Failed: 0)
Non-zero exit status: 255
Parse errors: Bad plan. You planned 36 tests but ran 29.
t/v71.t (Wstat: 65280 Tests: 5 Failed: 0)
Non-zero exit status: 255
Parse errors: Bad plan. You planned 23 tes
n system cannot work at all if the path to cygwin\bin is not in
the PATH. E.g. cygwin perl will not work. A lot of tests which reset or
localize a PATH have special CYGWIN code to set the PATH to include
\cygwin\bin.
So it's a very esoteric issue you are fighting here, and really not
worth checking.
--
Reini Urban
place so I can't do any
>> googling or research on this until I am back at the other
>> place that has broadband. Probably next week. If you want
>> to research it yourself, there should be enough info above
>> for you to do it. RtlCaptureContext is what I would be
>> using for debugging and printf dumping all 8 bytes of
>> CBRETVAL * retval in PerlCallback in Callback.xs every
>> time PerlCallback is called.
>
> I am adding the above to the bug report for tracking
> purposes.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
Sat Jun 07 00:57:06 2014: Request 96279 was acted upon.
Transaction: Correspondence added by rur...@x-ray.at
Queue: Win32-API
Subject: "Perl -MO=Xref Win32/API.pm" (0.74, 0.77) gives runtime error on
Perl 5.12.4
Broken in: 0.74, 0.77
Severity: Normal
Owner: Nobody
Reque
Sat Jun 07 01:13:46 2014: Request 96279 was acted upon.
Transaction: Correspondence added by rur...@x-ray.at
Queue: Win32-API
Subject: "Perl -MO=Xref Win32/API.pm" (0.74, 0.77) gives runtime error on
Perl 5.12.4
Broken in: 0.74, 0.77
Severity: Normal
Owner: Nobody
Reque
a few more fixes to
maint-5.14 already.
https://github.com/rurban/perl/commits/maint-5.14
more patches coming. B::*, hash security and performance, and some more.
--
Reini Urban
http://cpanel.net/ http://www.perl-compiler.org/
59 matches
Mail list logo
