wine-commits June 2014

wine-commits@winehq.org

4 participants
378 discussions

Alexandre Julliard : comctl32/tests: Output message sequences only on failure.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: wine Branch: master Commit: 6ad2cf9b5350adff859d36e3438be6a4a54c9fe0 URL: http://source.winehq.org/git/wine.git/?a=commit;h=6ad2cf9b5350adff859d36e34… Author: Alexandre Julliard <julliard(a)winehq.org> Date: Thu Jun 12 10:18:23 2014 +0200 comctl32/tests: Output message sequences only on failure. --- dlls/comctl32/tests/msg.h | 97 +++++++++++++++++++++++++++++++++++++--- dlls/comctl32/tests/syslink.c | 4 -- dlls/comctl32/tests/tab.c | 4 -- dlls/comctl32/tests/toolbar.c | 1 - dlls/comctl32/tests/trackbar.c | 4 -- dlls/comctl32/tests/treeview.c | 1 - dlls/comctl32/tests/updown.c | 6 --- 7 files changed, 91 insertions(+), 26 deletions(-) Diff: http://source.winehq.org/git/wine.git/?a=commitdiff;h=6ad2cf9b5350adff859d3…

1 0

Vincent Povirk : ole32: Support storage files larger than 4 GB.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: wine Branch: master Commit: 81079552738be5291e563186e9acbbb22e50bbcf URL: http://source.winehq.org/git/wine.git/?a=commit;h=81079552738be5291e563186e… Author: Vincent Povirk <vincent(a)codeweavers.com> Date: Tue May 20 16:08:09 2014 -0500 ole32: Support storage files larger than 4 GB. --- dlls/ole32/stg_stream.c | 4 +- dlls/ole32/storage32.c | 100 ++++++++++++++++++++++------------------------- dlls/ole32/storage32.h | 1 + 3 files changed, 49 insertions(+), 56 deletions(-) Diff: http://source.winehq.org/git/wine.git/?a=commitdiff;h=81079552738be5291e563…

1 0

Piotr Caban : msvcp90: Fix typo in strstreambuf_freeze.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: wine Branch: master Commit: ab0513ef67f33a64627792ed3cb9b9a7d1b55c28 URL: http://source.winehq.org/git/wine.git/?a=commit;h=ab0513ef67f33a64627792ed3… Author: Piotr Caban <piotr(a)codeweavers.com> Date: Wed Jun 11 12:50:39 2014 +0200 msvcp90: Fix typo in strstreambuf_freeze. --- dlls/msvcp60/ios.c | 2 +- dlls/msvcp90/ios.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/dlls/msvcp60/ios.c b/dlls/msvcp60/ios.c index b223d10..913086a 100644 --- a/dlls/msvcp60/ios.c +++ b/dlls/msvcp60/ios.c @@ -11586,7 +11586,7 @@ void __thiscall strstreambuf_freeze(strstreambuf *this, MSVCP_bool freeze) { TRACE("(%p %d)\n", this, freeze); - if(!freeze == !(this->strmode *STRSTATE_Frozen)) + if(!freeze == !(this->strmode & STRSTATE_Frozen)) return; if(freeze) { diff --git a/dlls/msvcp90/ios.c b/dlls/msvcp90/ios.c index d8f1e1c..f7cb232 100644 --- a/dlls/msvcp90/ios.c +++ b/dlls/msvcp90/ios.c @@ -13241,7 +13241,7 @@ void __thiscall strstreambuf_freeze(strstreambuf *this, MSVCP_bool freeze) { TRACE("(%p %d)\n", this, freeze); - if(!freeze == !(this->strmode *STRSTATE_Frozen)) + if(!freeze == !(this->strmode & STRSTATE_Frozen)) return; if(freeze) {

1 0

Francois Gouget : testbot/lib: Improve Collection::Validate()' s error reporting.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: 2fd3c073f6579e1051bcc2bff8cedfe490425183 URL: http://source.winehq.org/git/tools.git/?a=commit;h=2fd3c073f6579e1051bcc2bf… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Thu Jun 12 10:15:51 2014 +0200 testbot/lib: Improve Collection::Validate()'s error reporting. The error message contains no information about the Collection so it should mention the guilty Item's full key. --- testbot/lib/ObjectModel/Collection.pm | 5 +++-- testbot/lib/ObjectModel/Item.pm | 3 +-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/testbot/lib/ObjectModel/Collection.pm b/testbot/lib/ObjectModel/Collection.pm index 0070c57..53ad5fe 100644 --- a/testbot/lib/ObjectModel/Collection.pm +++ b/testbot/lib/ObjectModel/Collection.pm @@ -404,7 +404,8 @@ sub Validate (my $ErrProperty, my $ErrMessage) = $Item->Validate(); if (defined($ErrMessage)) { - return ($Item->GetKey(), $ErrProperty, $ErrMessage); + return ($Item->GetKey(), $ErrProperty, "$ErrMessage for " . + $self->GetItemName() . " " . $Item->GetFullKey()); } if ($Item->GetIsNew()) { @@ -424,7 +425,7 @@ sub Validate my $ExistingItem = $self->GetBackEnd()->LoadItem($self, $Item->GetKey()); if (defined($ExistingItem)) { - $ErrMessage = $self->GetItemName() . " " . $ErrMessage . + $ErrMessage = $self->GetItemName() . " " . $Item->GetFullKey() . " already exists"; return ($Item->GetKey(), undef, $ErrMessage); } diff --git a/testbot/lib/ObjectModel/Item.pm b/testbot/lib/ObjectModel/Item.pm index 0cc07ab..2ec69f1 100644 --- a/testbot/lib/ObjectModel/Item.pm +++ b/testbot/lib/ObjectModel/Item.pm @@ -382,8 +382,7 @@ sub Validate my ($ErrKey, $ErrProperty, $ErrMessage) = $Detail->Validate(); if (defined($ErrMessage)) { - return (undef, $ErrMessage . " for " . $Detail->GetItemName() . - $ErrKey); + return (undef, $ErrMessage); } } }

1 0

Francois Gouget : testbot/lib: Simplify and optimize Collection::Validate( ).
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: f65fa587273a3130ec69f04a26f3ce1d17fe503d URL: http://source.winehq.org/git/tools.git/?a=commit;h=f65fa587273a3130ec69f04a… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Thu Jun 12 10:15:45 2014 +0200 testbot/lib: Simplify and optimize Collection::Validate(). --- testbot/lib/ObjectModel/Collection.pm | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) diff --git a/testbot/lib/ObjectModel/Collection.pm b/testbot/lib/ObjectModel/Collection.pm index 7dbcf63..0070c57 100644 --- a/testbot/lib/ObjectModel/Collection.pm +++ b/testbot/lib/ObjectModel/Collection.pm @@ -409,18 +409,14 @@ sub Validate if ($Item->GetIsNew()) { my $HasSequenceKey = !1; - my $ErrProperty, my $ErrMessage; foreach my $PropertyDescriptor (@{$self->{PropertyDescriptors}}) { - if ($PropertyDescriptor->GetIsKey()) + if ($PropertyDescriptor->GetIsKey() && + $PropertyDescriptor->GetClass() eq "Basic" && + $PropertyDescriptor->GetType() eq "S") { - $ErrProperty = $PropertyDescriptor->GetName(); - $ErrMessage = $Item->$ErrProperty; - if ($PropertyDescriptor->GetClass() eq "Basic" && - $PropertyDescriptor->GetType() eq "S") - { - $HasSequenceKey = 1; - } + $HasSequenceKey = 1; + last; } } if (! $HasSequenceKey)

1 0

Francois Gouget : testbot/lib: Improve the Backend methods argument handling.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: 4ff885361b38d0cdfe024f6c9325539362872fa2 URL: http://source.winehq.org/git/tools.git/?a=commit;h=4ff885361b38d0cdfe024f6c… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Thu Jun 12 10:15:14 2014 +0200 testbot/lib: Improve the Backend methods argument handling. This standardizes the way we handle the arguments. Make it so one can readily see the list of arguments the method takes without having to hunt down the implementation of all its ancestors. Because these are methods the added prototypes have no effect whatsoever as far as Perl is concerned. However they do document which arguments are optional. --- testbot/lib/ObjectModel/BackEnd.pm | 8 ++-- testbot/lib/ObjectModel/DBIBackEnd.pm | 82 +++++++++++++-------------------- 2 files changed, 38 insertions(+), 52 deletions(-) diff --git a/testbot/lib/ObjectModel/BackEnd.pm b/testbot/lib/ObjectModel/BackEnd.pm index cf7439e..561bfce 100644 --- a/testbot/lib/ObjectModel/BackEnd.pm +++ b/testbot/lib/ObjectModel/BackEnd.pm @@ -35,17 +35,19 @@ require Exporter; @ISA = qw(Exporter); @EXPORT = qw(%ActiveBackEnds); -sub new +sub new($@) { my $class = shift; + my $self = {}; $self = bless $self, $class; - $self->_initialize(); + $self->_initialize(@_); return $self; } -sub _initialize +sub _initialize($) { + #my ($self) = @_; } 1; diff --git a/testbot/lib/ObjectModel/DBIBackEnd.pm b/testbot/lib/ObjectModel/DBIBackEnd.pm index 06b139d..45bd1f6 100644 --- a/testbot/lib/ObjectModel/DBIBackEnd.pm +++ b/testbot/lib/ObjectModel/DBIBackEnd.pm @@ -40,9 +40,9 @@ require Exporter; @ISA = qw(ObjectModel::BackEnd Exporter); @EXPORT = qw(&UseDBIBackend); -sub GetDb +sub GetDb($) { - my $self = shift; + my ($self) = @_; if (defined $self->{Db} && !$self->{Db}->ping()) { @@ -58,10 +58,9 @@ sub GetDb return $self->{Db}; } -sub ToDb +sub ToDb($$$) { - my $self = shift; - my ($Value, $PropertyDescriptor) = @_; + my ($self, $Value, $PropertyDescriptor) = @_; if ($PropertyDescriptor->GetClass eq "Basic") { @@ -97,10 +96,9 @@ sub ToDb return $Value; } -sub FromDb +sub FromDb($$$) { - my $self = shift; - my ($Value, $PropertyDescriptor) = @_; + my ($self, $Value, $PropertyDescriptor) = @_; if ($PropertyDescriptor->GetClass eq "Basic") { @@ -129,10 +127,9 @@ sub FromDb return $Value; } -sub BuildKeyWhere +sub BuildKeyWhere($$$$) { - my $self = shift; - my ($PropertyDescriptors, $ColPrefix, $Where) = @_; + my ($self, $PropertyDescriptors, $ColPrefix, $Where) = @_; foreach my $PropertyDescriptor (@{$PropertyDescriptors}) { @@ -152,10 +149,9 @@ sub BuildKeyWhere return $Where; } -sub BuildFieldList +sub BuildFieldList($$) { - my $self = shift; - my $PropertyDescriptors = $_[0]; + my ($self, $PropertyDescriptors) = @_; my $Fields = ""; foreach my $PropertyDescriptor (@$PropertyDescriptors) @@ -173,10 +169,9 @@ sub BuildFieldList return $Fields; } -sub LoadCollection +sub LoadCollection($$) { - my $self = shift; - my $Collection = $_[0]; + my ($self, $Collection) = @_; my $Fields = $self->BuildFieldList($Collection->GetPropertyDescriptors()); @@ -266,10 +261,9 @@ however put the Item in the Collection's scope. =back =cut -sub LoadItem +sub LoadItem($$$) { - my $self = shift; - my ($Collection, $RequestedKey) = @_; + my ($self, $Collection, $RequestedKey) = @_; my $Fields = $self->BuildFieldList($Collection->GetPropertyDescriptors()); @@ -314,10 +308,9 @@ sub LoadItem return $Item; } -sub BuildInsertStatement +sub BuildInsertStatement($$$$) { - my $self = shift; - my ($TableName, $PropertyDescriptors, $MasterColNames) = @_; + my ($self, $TableName, $PropertyDescriptors, $MasterColNames) = @_; my $Fields = ""; my $PlaceHolders = ""; @@ -352,11 +345,9 @@ sub BuildInsertStatement return "INSERT INTO $TableName ($Fields) VALUES($PlaceHolders)"; } -sub GetInsertData +sub GetInsertData($$$) { - my $self = shift; - my $MasterColValues = shift; - my $Item = shift; + my ($self, $MasterColValues, $Item) = @_; my @Data; if (defined($MasterColValues)) @@ -376,10 +367,9 @@ sub GetInsertData return \@Data; } -sub BuildUpdateStatement +sub BuildUpdateStatement($$$$) { - my $self = shift; - my ($TableName, $PropertyDescriptors, $MasterColNames) = @_; + my ($self, $TableName, $PropertyDescriptors, $MasterColNames) = @_; my $Fields = ""; foreach my $PropertyDescriptor (@{$PropertyDescriptors}) @@ -407,11 +397,9 @@ sub BuildUpdateStatement return "UPDATE $TableName SET $Fields WHERE $Where"; } -sub GetUpdateData +sub GetUpdateData($$$) { - my $self = shift; - my $MasterColValues = shift; - my $Item = shift; + my ($self, $MasterColValues, $Item) = @_; my @Data; foreach my $PropertyDescriptor (@{$Item->GetPropertyDescriptors()}) @@ -445,10 +433,9 @@ sub GetUpdateData return \@Data; } -sub SaveCollection +sub SaveCollection($$) { - my $self = shift; - my $Collection = shift; + my ($self, $Collection) = @_; my $Db = $self->GetDb(); my ($MasterColNames, $MasterColValues) = $Collection->GetMasterCols(); @@ -500,10 +487,9 @@ sub SaveCollection $UpdateStatement->finish(); } -sub SaveItem +sub SaveItem($$) { - my $self = shift; - my $Item = $_[0]; + my ($self, $Item) = @_; my $Query; my ($MasterColNames, $MasterColValues) = $Item->GetMasterCols(); @@ -528,10 +514,9 @@ sub SaveItem $Statement->finish(); } -sub DeleteItem +sub DeleteItem($$) { - my $self = shift; - my $Item = shift; + my ($self, $Item) = @_; my $Where = ""; my @Data; @@ -554,10 +539,9 @@ sub DeleteItem return undef; } -sub DeleteAll +sub DeleteAll($$) { - my $self = shift; - my $Collection = shift; + my ($self, $Collection) = @_; my $Where = ""; my @Data; @@ -580,9 +564,9 @@ sub DeleteAll return undef; } -sub PrepareForFork +sub PrepareForFork($) { - my $self = shift; + my ($self) = @_; if (defined($self->{Db})) { @@ -591,7 +575,7 @@ sub PrepareForFork } } -sub UseDBIBackEnd +sub UseDBIBackEnd($$@) { my $class = shift; my $DbSelector = shift;

1 0

Francois Gouget : testbot/lib: DBIBackend::LoadItem() must not return objects from the Collection scope.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: 2a350500f2075a7da7c0b8337772ede3b94978d6 URL: http://source.winehq.org/git/tools.git/?a=commit;h=2a350500f2075a7da7c0b833… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Thu Jun 12 10:14:41 2014 +0200 testbot/lib: DBIBackend::LoadItem() must not return objects from the Collection scope. Such checks belong to the higher levels. Doing them in LoadItem() interferes with Collection::Validate(), causing it to think new items are already present in the database whenever they don't have Sequence keys. --- testbot/lib/ObjectModel/DBIBackEnd.pm | 18 ++++++++++++++---- 1 file changed, 14 insertions(+), 4 deletions(-) diff --git a/testbot/lib/ObjectModel/DBIBackEnd.pm b/testbot/lib/ObjectModel/DBIBackEnd.pm index c89fa64..06b139d 100644 --- a/testbot/lib/ObjectModel/DBIBackEnd.pm +++ b/testbot/lib/ObjectModel/DBIBackEnd.pm @@ -253,14 +253,24 @@ sub LoadCollection $Statement->finish(); } +=pod +=over 12 + +=item C<LoadItem()> + +Loads the specified Item from the database and adds it to the Collection. +By design this method will not check if the Item is already present in the +Collection scope. Such checks belong in the higher levels. This method will +however put the Item in the Collection's scope. + +=back +=cut + sub LoadItem { my $self = shift; my ($Collection, $RequestedKey) = @_; - my $Item = $Collection->GetScopeItem($RequestedKey); - return $Item if (defined $Item); - my $Fields = $self->BuildFieldList($Collection->GetPropertyDescriptors()); my $Where = ""; @@ -283,7 +293,7 @@ sub LoadItem my $Statement = $self->GetDb()->prepare($Query); $Statement->execute(@Data); - $Item = undef; + my $Item; if (my $Row = $Statement->fetchrow_hashref()) { $Item = $Collection->CreateItem();

1 0

Francois Gouget : testbot: Update the SSL Apache configuration section to match the regular one.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: bc4d58b448be3d2fbdb6cd5c180ac74467ae5af0 URL: http://source.winehq.org/git/tools.git/?a=commit;h=bc4d58b448be3d2fbdb6cd5c… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Mon Jun 9 12:48:03 2014 +0200 testbot: Update the SSL Apache configuration section to match the regular one. --- testbot/doc/vhost_winetestbot.conf | 17 +++++++++++++++-- 1 file changed, 15 insertions(+), 2 deletions(-) diff --git a/testbot/doc/vhost_winetestbot.conf b/testbot/doc/vhost_winetestbot.conf index 5953317..7b84564 100644 --- a/testbot/doc/vhost_winetestbot.conf +++ b/testbot/doc/vhost_winetestbot.conf @@ -32,7 +32,7 @@ </Directory> </VirtualHost> -<VirtualHost 192.168.0.1:443> +<VirtualHost *:443> DocumentRoot /home/winehq/tools/testbot/web/ ServerName winetestbot.example.com @@ -42,8 +42,18 @@ SSLCertificateFile /etc/apache2/ssl.crt/winetestbot.example.com.crt SSLCertificateKeyFile /etc/apache2/ssl.key/winetestbot.example.com.key - PerlRequire /home/winehq/tools/testbot/lib/startup.pl PerlSwitches -Tw + <Perl> + use strict; + BEGIN + { + $::RootDir = "/home/winehq/tools/testbot"; + unshift @INC, "$::RootDir/lib"; + } + use ObjectModel::CGI::Page; + use WineTestBot::CGI::PageBase; + SetPageBaseCreator(\&CreatePageBase); + </Perl> <Directory /home/winehq/tools/testbot/web> AddHandler perl-script .pl @@ -52,7 +62,10 @@ Options +ExecCGI DirectoryIndex index.pl + # Access control the Apache 2.2 way Order allow,deny Allow from all + # And the Apache 2.4 way + Require all granted </Directory> </VirtualHost>

1 0

Francois Gouget : testbot: Remove duplicate options from the sample Apache configuration file.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: b76db4ff3768eb5e9f5939fb0e0f915875b8dfb6 URL: http://source.winehq.org/git/tools.git/?a=commit;h=b76db4ff3768eb5e9f5939fb… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Mon Jun 9 12:47:53 2014 +0200 testbot: Remove duplicate options from the sample Apache configuration file. --- testbot/doc/vhost_winetestbot.conf | 2 -- 1 file changed, 2 deletions(-) diff --git a/testbot/doc/vhost_winetestbot.conf b/testbot/doc/vhost_winetestbot.conf index 3219bcd..5953317 100644 --- a/testbot/doc/vhost_winetestbot.conf +++ b/testbot/doc/vhost_winetestbot.conf @@ -22,8 +22,6 @@ PerlResponseHandler ModPerl::Registry PerlOptions +ParseHeaders Options +ExecCGI - PerlOptions +ParseHeaders - Options +ExecCGI DirectoryIndex index.pl # Access control the Apache 2.2 way

1 0

Francois Gouget : testbot/web: Use the default Domain and Path of our cookies.
by Alexandre Julliard 12 Jun '14

12 Jun '14

Module: tools Branch: master Commit: 70ebd159c77017701d59d92f391a502e80bea2d3 URL: http://source.winehq.org/git/tools.git/?a=commit;h=70ebd159c77017701d59d92f… Author: Francois Gouget <fgouget(a)codeweavers.com> Date: Mon Jun 9 12:43:28 2014 +0200 testbot/web: Use the default Domain and Path of our cookies. The Path defaults to '/' which is what we want. The Domain is set to the most restrictive value which is good. This also means we're no longer putting the port number in the Domain value which fixes our cookies when the web server is running on a non-standard port or the connection is going through port forwarding. --- testbot/lib/WineTestBot/CGI/PageBase.pm | 4 ---- 1 file changed, 4 deletions(-) diff --git a/testbot/lib/WineTestBot/CGI/PageBase.pm b/testbot/lib/WineTestBot/CGI/PageBase.pm index bfa44c4..a724507 100644 --- a/testbot/lib/WineTestBot/CGI/PageBase.pm +++ b/testbot/lib/WineTestBot/CGI/PageBase.pm @@ -162,8 +162,6 @@ sub SetCookies($) $Cookie = CGI::Cookie->new(-Name => "SessionId", -Value => $Session->Id, -Expires => $Expire, - -Domain => $ENV{"HTTP_HOST"}, - -Path => "/", -Secure => $UseSSL); $Request->err_headers_out->add("Set-Cookie", $Cookie); } @@ -184,8 +182,6 @@ sub SetCookies($) $Cookie = CGI::Cookie->new(-Name => "SessionActive", -Value => $SessionPermanent, -Expires => $Expire, - -Domain => $ENV{"HTTP_HOST"}, - -Path => "/", -Secure => !1); $Request->err_headers_out->add("Set-Cookie", $Cookie); }

1 0

← Newer
1
...
26
27
28
29
30
31
32
...
38
Older →

Jump to page:

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

2001

wine-commits June 2014