- developers-list - monetdb.org

[Monetdb-developers] Re : Re : Cannot get perl talking to monetdb5 nightly stable
by sylver_b 10 Sep '08

10 Sep '08

Hi Yes i've contacted Steffen- this was his complete answer : On Tue, Sep 9, 2008 at 9:21 AM, Steffen Goeldner wrote: Hi Steffen, I'm experiencing some difficulties with the Perl lib - i've spent the past 3 days trying to get this to work but i can't find any log, any error message etc ... I'm really unhappy that I found no time to maintain the perl modules lately. MonetDB::CLI::MapiPP still speaks protocol version 4, not 5. Maybe the libMapi based MonetDB::CLI::MapiLib works with the current version - I didn't test it. Steffen ----- Message d'origine ---- De : Fabian Groffen <Fabian.Groffen(a)cwi.nl> À : monetdb-developers(a)lists.sourceforge.net Envoyé le : Mercredi, 10 Septembre 2008, 8h11mn 45s Objet : Re: [Monetdb-developers] Re : Cannot get perl talking to monetdb5 nightly stable On 09-09-2008 01:36:21 -0700, sylver_b wrote: > Hi > > For the one wondering why the Perl lib doesn't work with monetdb , this > is the answer from the developer : You had contact with Steffen Goeldner? > >MonetDB::CLI::MapiPP still speaks protocol version 4, not 5. > >Maybe the libMapi based MonetDB::CLI::MapiLib works with the > >current version - I didn't test it. I am trying to come up with a patch for MapiPP, since it's clearly useless in its current state. ------------------------------------------------------------------------- This SF.Net email is sponsored by the Moblin Your Move Developer's challenge Build the coolest Linux based applications with Moblin SDK & win great prizes Grand prize is a trip for two to an Open Source event anywhere in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/ _______________________________________________ Monetdb-developers mailing list Monetdb-developers(a)lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/monetdb-developers

3 3

[Monetdb-developers] Re : ODBC, no database selected
by sylver_b 10 Sep '08

10 Sep '08

Hi Stefan, I've started the DB with the following commands : 1. merovingian 2. monetdb create demo 3. monetdb start demo 3. mclient -lsql --time -d demo I get the prompt straight away, but i have to specify the db - mclient -lsql , says: !please specify a database - i don't have any other DB at the moment, just evaluating monetdb to migrate a call detail records application ; for that purpose i've developed a simple ETL tool in perl that extract specific fields from a CSV file and insert them in the DB. Maybe there is a better way to do that ? by the way , ps faux gives me : root 11224 0.0 0.0 63160 1816 pts/2 Sl 00:17 0:00 merovingian root 11229 0.0 1.7 107680 69816 ? Ssl 00:17 0:00 \_ /root/MonetDB/bin/mserver5 --config=/root/MonetD B/etc/monetdb5.conf --dbname=demo --dbinit=include sql; --set monet_daemon yes --set mapi_open true --set mapi_port 0 --set monet_vault_key /root/MonetDB/var/MonetDB5/dbfarm/demo/.vaultkey Please advise, Thanks SB ----- Message d'origine ---- De : Stefan Manegold <Stefan.Manegold(a)cwi.nl> À : sylver_b <sylver_b(a)yahoo.com> Cc : monetdb-developers(a)lists.sf.net Envoyé le : Mercredi, 10 Septembre 2008, 6h19mn 03s Objet : Re: [Monetdb-developers] ODBC, no database selected Hi "sylver_b", just a simple & quick saniy check: How did you start your MonetDB server? Can you connect with `mclient -lsql`? Stefan On Tue, Sep 09, 2008 at 04:56:47PM -0700, sylver_b wrote: > Hi Eveyone, > > I'm trying to connect to monetdb with this time, ODBC - but still no luck. > > Here is the output of my script : > > ./monetdb2.pl > DBI connect('DSN_MonetDB','monetdb',...) failed: [unixODBC][MonetDB][ODBC Driver 1.0]Client unable to establish connection (SQL-08001)(DBD: db_login/SQLConnect err=-1) at ./monetdb2.pl line 6 > [unixODBC][MonetDB][ODBC Driver 1.0]Client unable to establish connection (SQL-08001)(DBD: db_login/SQLConnect err=-1) > > cat monetdb2.pl > #!/usr/bin/perl > > use DBI(); > > > my $dbh = DBI-> connect('dbi:ODBC:DSN_MonetDB', 'monetdb', 'monetdb', {database => demo}) or die ($DBI::errstr . "\n"); > > if (!$dbh) > { > print "$DBI::err\n$DBI::errstr\n$DBI::state"; > } > else > { > $dbh->disconnect if ($dbh); > } > > my $sth = $dbh->prepare('SELECT * FROM env() env'); > $sth->execute; > $sth->dump_results; > > This the merovingian output : > tail -f /root/MonetDB/var/log/merovingian.log > MSG demo[11229]: # MonetDB server v5.6.0, based on kernel v1.24.0 > MSG demo[11229]: # Serving database 'demo' > MSG demo[11229]: # Compiled for i686-pc-linux-gnu/32bit with 32bit OIDs dynamically linked > MSG demo[11229]: # Copyright (c) 1993-2008 CWI, all rights reserved > MSG demo[11229]: # Visit http://monetdb.cwi.nl/ for further information > MSG demo[11229]: # Listening for connection requests on mapi:monetdb://ulys:50001/ > ERR merovingian[11224]: client error: no database specified > MSG merovingian[11224]: database 'demo' already running since 2008-09-10 00:17:32, up min/avg/max: 30/2181/7036, crash average: 0.00 0.00 0.00 (6-5=0) > MSG merovingian[11224]: proxying client 127.0.0.1:59244 for database 'demo' to mapi:monetdb://ulys:50001/ > MSG merovingian[11224]: client has 127.0.0.1:59244 disconnected from proxy > > ERR merovingian[11224]: client error: no database specified > > This is the content of my odbc.ini & odbcinst.ini : > > [DSN_MonetDB] > Description = ODBC Driver for MonetDB SQL Server > Driver = /root/MonetDB/lib/libMonetODBC.so > Port = 50000 > Host = localhost > Database = demo > User = monetdb > Password = monetdb > Debug = 1 > Trace = 1 > DebugFile = /var/log/odbc-debugfile.log > TraceFile = /var/log/odbc-tracefile.log > > odbcinst.ini > [DSN_MonetDB] > Description = ODBC Driver for MonetDB SQL Server > Driver = /root/MonetDB/lib/libMonetODBC.so > Setup = /root/MonetDB/lib/libMonetODBCs.so > FileUsage = 1 > CommLog = 1 > Debug = 1 > > I also tried with PHP odbc, same result - how to specify the DB right from the script ? > > > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's challenge > Build the coolest Linux based applications with Moblin SDK & win great prizes > Grand prize is a trip for two to an Open Source event anywhere in the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Monetdb-developers mailing list > Monetdb-developers(a)lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/monetdb-developers -- | Dr. Stefan Manegold | mailto:Stefan.Manegold@cwi.nl | | CWI, P.O.Box 94079 | http://www.cwi.nl/~manegold/ | | 1090 GB Amsterdam | Tel.: +31 (20) 592-4212 | | The Netherlands | Fax : +31 (20) 592-4312 |

2 1

[Monetdb-developers] Re : Re : Cannot get perl talking to monetdb5 nightly stable
by sylver_b 10 Sep '08

10 Sep '08

Hi To make this successful, I think ODBC is the best bet here, as i also would like to migrate a PHP application that use Propel (symfony framework) - they don't have monetdb implemented but they do have ODBC. SB ----- Message d'origine ---- De : Fabian Groffen <Fabian.Groffen(a)cwi.nl> À : monetdb-developers(a)lists.sourceforge.net Envoyé le : Mercredi, 10 Septembre 2008, 8h23mn 34s Objet : Re: [Monetdb-developers] Re : Cannot get perl talking to monetdb5 nightly stable On 09-09-2008 01:36:21 -0700, sylver_b wrote: > Hi > > For the one wondering why the Perl lib doesn't work with monetdb , this > is the answer from the developer : > > >MonetDB::CLI::MapiPP still speaks protocol version 4, not 5. > >Maybe the libMapi based MonetDB::CLI::MapiLib works with the > >current version - I didn't test it. I think we should remove MapiPP, it can't and won't work any more. It seems like a relatively large investment to /make/ it work. In contrast, Mapi.pm seems to be up-to-date to the latest protocol, while also being a pure perl implementation. Can you use Mapi.pm for your application? ------------------------------------------------------------------------- This SF.Net email is sponsored by the Moblin Your Move Developer's challenge Build the coolest Linux based applications with Moblin SDK & win great prizes Grand prize is a trip for two to an Open Source event anywhere in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/ _______________________________________________ Monetdb-developers mailing list Monetdb-developers(a)lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/monetdb-developers

1 0

[Monetdb-developers] Re : ODBC, no database selected
by sylver_b 10 Sep '08

10 Sep '08

Hi Fabian, Effectively , successful connections are from the mclient. SB ----- Message d'origine ---- De : Fabian Groffen <Fabian.Groffen(a)cwi.nl> À : monetdb-developers(a)lists.sourceforge.net Envoyé le : Mercredi, 10 Septembre 2008, 7h55mn 38s Objet : Re: [Monetdb-developers] ODBC, no database selected Hi Sylver, On 09-09-2008 16:56:47 -0700, sylver_b wrote: [snip] > my $dbh = DBI-> connect('dbi:ODBC:DSN_MonetDB', 'monetdb', 'monetdb', > {database => demo}) or die ($DBI::errstr . "\n"); My perl is pretty much non-existant. However, it looks as if you *do* specify that you want to use a database, "demo" in this case. > This the merovingian output : > tail -f /root/MonetDB/var/log/merovingian.log > MSG demo[11229]: # MonetDB server v5.6.0, based on kernel v1.24.0 > MSG demo[11229]: # Serving database 'demo' > MSG demo[11229]: # Compiled for i686-pc-linux-gnu/32bit with 32bit OIDs > dynamically linked > MSG demo[11229]: # Copyright (c) 1993-2008 CWI, all rights reserved > MSG demo[11229]: # Visit http://monetdb.cwi.nl/ for further information > MSG demo[11229]: # Listening for connection requests on mapi:monetdb:// > ulys:50001/ > ERR merovingian[11224]: client error: no database specified > MSG merovingian[11224]: database 'demo' already running since > 2008-09-10 00:17:32, up min/avg/max: 30/2181/7036, crash average: 0.00 > 0.00 0.00 (6-5=0) > MSG merovingian[11224]: proxying client 127.0.0.1:59244 for database > 'demo' to mapi:monetdb://ulys:50001/ > MSG merovingian[11224]: client has 127.0.0.1:59244 disconnected from > proxy > > ERR merovingian[11224]: client error: no database specified Merovingian here sees no database requested. The other successful calls in this log snippet are from mclient or something? > I also tried with PHP odbc, same result - how to specify the DB right > from the script ? Weird. Maybe the odbc driver doesn't catch up the database argument (yet). Sjoerd, any idea on this one? ------------------------------------------------------------------------- This SF.Net email is sponsored by the Moblin Your Move Developer's challenge Build the coolest Linux based applications with Moblin SDK & win great prizes Grand prize is a trip for two to an Open Source event anywhere in the world http://moblin-contest.org/redirect.php?banner_id=100&url=/ _______________________________________________ Monetdb-developers mailing list Monetdb-developers(a)lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/monetdb-developers

1 0

[Monetdb-developers] Re : Cannot get perl talking to monetdb5 nightly stable
by sylver_b 10 Sep '08

10 Sep '08

Hi For the one wondering why the Perl lib doesn't work with monetdb , this is the answer from the developer : >MonetDB::CLI::MapiPP still speaks protocol version 4, not 5. >Maybe the libMapi based MonetDB::CLI::MapiLib works with the >current version - I didn't test it. SB ----- Message d'origine ---- De : sylver_b <sylver_b(a)yahoo.com> À : monetdb-developers(a)lists.sourceforge.net Envoyé le : Mardi, 9 Septembre 2008, 8h24mn 06s Objet : RE: [Monetdb-developers] Cannot get perl talking to monetdb5 nightly stable Hi Everyone, I'm also experiencing some difficulties with Perl - i've spent the past 3 days trying to get this to work but i can't find any log, any error message etc ... I've installed all the perl libs , but when i run the test script, it's just stay there indefinitely with no output,no error - this is the script : cat monetdb2.pl #!/usr/bin/perl use DBI(); my $dbh = DBI->connect('dbi:monetdb:'); my $sth = $dbh->prepare('SELECT * FROM env'); $sth->execute; $sth->dump_results; I'm running monetdb with the following command: root@ulys:~# mserver5 --dbinit="include sql;" --dbname=demo --daemon=yes # MonetDB server v5.6.0, based on kernel v1.24.0 # Serving database 'demo' # Compiled for i686-pc-linux-gnu/32bit with 32bit OIDs dynamically linked # Copyright (c) 1993-2008 CWI, all rights reserved # Visit http://monetdb.cwi.nl/ for further information #warning: please don't forget to set your vault key! #(see /root/MonetDB/etc/monetdb5.conf) # Listening for connection requests on mapi:monetdb://127.0.0.1:50000/ # MonetDB/SQL module v2.24.0 loaded when i kill the monetdb daemon, my perl script is throwing this error : # ./monetdb2.pl Caught a SIGPIPE at /usr/local/share/perl/5.8.8/MonetDB/CLI/MapiPP.pm line 93 $ = eval {...} called from file `/usr/local/share/perl/5.8.8/MonetDB/CLI/MapiPP.pm' line 93 $ = MonetDB::CLI::MapiPP::Req::query('MonetDB::CLI::MapiPP::Req=HASH(0x83a66e0)', 'SELECT * FROM env') called from file `/usr/local/share/perl/5.8.8/DBD/monetdb.pm' line 567 $ = eval {...} called from file `/usr/local/share/perl/5.8.8/DBD/monetdb.pm' line 567 $ = DBD::monetdb::st::execute('DBI::st=HASH(0x83a683c)') called from file `./monetdb2.pl' line 8 Aborted Also i can connect with no problem with mclient (no password required). Please advise on how to get perl talking to monetdb5. Thanks in advance, SB ------ original message ------- [Monetdb-developers] Cannot get perl talking to monetdb5 nightly stableFrom: Rt Ibmer <rtibmx@ya...> - 2008-06-17 02:06 I am using the nightly stable build of monetdb5. All outside of perl->monetdb seems to be working just fine. I just can't get perl to talk to the db. Here's what I did: - installed from nightly stable source on Fedora 8 - copied the source from http://homepages.cwi.nl/~mk/MonetDB/The-Perl-Library.html into mytest.pl - tried running: perl /tmp/mytest.pl but it came back complaining about missing libs in @INC. So then I added these steps: - /var/tmp/MonetDB-1213632062/MonetDB-client/clients/src/perl - make install and also ran make instlal in the various subdirs like MonetDB-CLI and others (not sure if this step was necessar) Then I tried running the script and this time it executed without the @INC errors. So this was progress. However all I get is this: ------- Start a simple Monet MIL interaction data sources: dbi:monetdb: -------- and then nothing. It just sits there indefinitely. In playing with the source of the .pl I see that it is the "my $dbh = DBI->connect( $dsn, ..." that execution stops at. I have merovingian running and the db is started. I also tried with merovigan stopped and just using mserver5 --dbinit="include sql;" but I had the same result. Am I doing something wrong? Thanks.

3 3

[Monetdb-developers] ODBC, no database selected
by sylver_b 10 Sep '08

10 Sep '08

Hi Eveyone, I'm trying to connect to monetdb with this time, ODBC - but still no luck. Here is the output of my script : ./monetdb2.pl DBI connect('DSN_MonetDB','monetdb',...) failed: [unixODBC][MonetDB][ODBC Driver 1.0]Client unable to establish connection (SQL-08001)(DBD: db_login/SQLConnect err=-1) at ./monetdb2.pl line 6 [unixODBC][MonetDB][ODBC Driver 1.0]Client unable to establish connection (SQL-08001)(DBD: db_login/SQLConnect err=-1) cat monetdb2.pl #!/usr/bin/perl use DBI(); my $dbh = DBI-> connect('dbi:ODBC:DSN_MonetDB', 'monetdb', 'monetdb', {database => demo}) or die ($DBI::errstr . "\n"); if (!$dbh) { print "$DBI::err\n$DBI::errstr\n$DBI::state"; } else { $dbh->disconnect if ($dbh); } my $sth = $dbh->prepare('SELECT * FROM env() env'); $sth->execute; $sth->dump_results; This the merovingian output : tail -f /root/MonetDB/var/log/merovingian.log MSG demo[11229]: # MonetDB server v5.6.0, based on kernel v1.24.0 MSG demo[11229]: # Serving database 'demo' MSG demo[11229]: # Compiled for i686-pc-linux-gnu/32bit with 32bit OIDs dynamically linked MSG demo[11229]: # Copyright (c) 1993-2008 CWI, all rights reserved MSG demo[11229]: # Visit http://monetdb.cwi.nl/ for further information MSG demo[11229]: # Listening for connection requests on mapi:monetdb://ulys:50001/ ERR merovingian[11224]: client error: no database specified MSG merovingian[11224]: database 'demo' already running since 2008-09-10 00:17:32, up min/avg/max: 30/2181/7036, crash average: 0.00 0.00 0.00 (6-5=0) MSG merovingian[11224]: proxying client 127.0.0.1:59244 for database 'demo' to mapi:monetdb://ulys:50001/ MSG merovingian[11224]: client has 127.0.0.1:59244 disconnected from proxy ERR merovingian[11224]: client error: no database specified This is the content of my odbc.ini & odbcinst.ini : [DSN_MonetDB] Description = ODBC Driver for MonetDB SQL Server Driver = /root/MonetDB/lib/libMonetODBC.so Port = 50000 Host = localhost Database = demo User = monetdb Password = monetdb Debug = 1 Trace = 1 DebugFile = /var/log/odbc-debugfile.log TraceFile = /var/log/odbc-tracefile.log odbcinst.ini [DSN_MonetDB] Description = ODBC Driver for MonetDB SQL Server Driver = /root/MonetDB/lib/libMonetODBC.so Setup = /root/MonetDB/lib/libMonetODBCs.so FileUsage = 1 CommLog = 1 Debug = 1 I also tried with PHP odbc, same result - how to specify the DB right from the script ?

3 2

Re: [Monetdb-developers] Cannot get perl talking to monetdb5 nightly stable
by sylver_b 09 Sep '08

09 Sep '08

Hi Everyone, I'm also experiencing some difficulties with Perl - i've spent the past 3 days trying to get this to work but i can't find any log, any error message etc ... I've installed all the perl libs , but when i run the test script, it's just stay there indefinitely with no output,no error - this is the script : cat monetdb2.pl #!/usr/bin/perl use DBI(); my $dbh = DBI->connect('dbi:monetdb:'); my $sth = $dbh->prepare('SELECT * FROM env'); $sth->execute; $sth->dump_results; I'm running monetdb with the following command: root@ulys:~# mserver5 --dbinit="include sql;" --dbname=demo --daemon=yes # MonetDB server v5.6.0, based on kernel v1.24.0 # Serving database 'demo' # Compiled for i686-pc-linux-gnu/32bit with 32bit OIDs dynamically linked # Copyright (c) 1993-2008 CWI, all rights reserved # Visit http://monetdb.cwi.nl/ for further information #warning: please don't forget to set your vault key! #(see /root/MonetDB/etc/monetdb5.conf) # Listening for connection requests on mapi:monetdb://127.0.0.1:50000/ # MonetDB/SQL module v2.24.0 loaded when i kill the monetdb daemon, my perl script is throwing this error : # ./monetdb2.pl Caught a SIGPIPE at /usr/local/share/perl/5.8.8/MonetDB/CLI/MapiPP.pm line 93 $ = eval {...} called from file `/usr/local/share/perl/5.8.8/MonetDB/CLI/MapiPP.pm' line 93 $ = MonetDB::CLI::MapiPP::Req::query('MonetDB::CLI::MapiPP::Req=HASH(0x83a66e0)', 'SELECT * FROM env') called from file `/usr/local/share/perl/5.8.8/DBD/monetdb.pm' line 567 $ = eval {...} called from file `/usr/local/share/perl/5.8.8/DBD/monetdb.pm' line 567 $ = DBD::monetdb::st::execute('DBI::st=HASH(0x83a683c)') called from file `./monetdb2.pl' line 8 Aborted Also i can connect with no problem with mclient (no password required). Please advise on how to get perl talking to monetdb5. Thanks in advance, SB ------ original message ------- [Monetdb-developers] Cannot get perl talking to monetdb5 nightly stableFrom: Rt Ibmer <rtibmx@ya...> - 2008-06-17 02:06 I am using the nightly stable build of monetdb5. All outside of perl->monetdb seems to be working just fine. I just can't get perl to talk to the db. Here's what I did: - installed from nightly stable source on Fedora 8 - copied the source from http://homepages.cwi.nl/~mk/MonetDB/The-Perl-Library.html into mytest.pl - tried running: perl /tmp/mytest.pl but it came back complaining about missing libs in @INC. So then I added these steps: - /var/tmp/MonetDB-1213632062/MonetDB-client/clients/src/perl - make install and also ran make instlal in the various subdirs like MonetDB-CLI and others (not sure if this step was necessar) Then I tried running the script and this time it executed without the @INC errors. So this was progress. However all I get is this: ------- Start a simple Monet MIL interaction data sources: dbi:monetdb: -------- and then nothing. It just sits there indefinitely. In playing with the source of the .pl I see that it is the "my $dbh = DBI->connect( $dsn, ..." that execution stops at. I have merovingian running and the db is started. I also tried with merovigan stopped and just using mserver5 --dbinit="include sql;" but I had the same result. Am I doing something wrong? Thanks.

1 0

Re: [Monetdb-developers] [Monetdb-checkins] MonetDB5/src/mal/Tests tst026.stable.out, , 1.5, 1.6 tst1505.stable.out, , 1.25, 1.26 tst220.stable.out, , 1.39, 1.40 tst280.stable.out, , 1.28, 1.29 tst903.stable.out, , 1.52, 1.53
by Stefan Manegold 06 Sep '08

06 Sep '08

On Sat, Sep 06, 2008 at 11:22:09AM +0000, Martin Kersten wrote: > Update of /cvsroot/monetdb/MonetDB5/src/mal/Tests > In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv8410/mal/Tests > > Modified Files: > tst026.stable.out tst1505.stable.out tst220.stable.out > tst280.stable.out tst903.stable.out > Log Message: > The function aggr.count() now returns a lng, because we have to support > tables with more then 3G tuples. > The grouping operations still assume 32 bits to be sufficient. Since we (as far as I can tell) can only support ~2G tuples on 32-bit systems, what about using "wrd" instead of "lng", i.e., 32-bit on 32-bit systems & 64-bit on 64-bit systems? In fact, with with Sjoerd recent changes, BAT cardinalities are of type "BUN" which is currently defined as "oid"; hence, BATs are limited ~2G tuples in case of 32-bit OIDs (even/also on 64-bit systems with 32-bit OIDs) --- a VoID column can obvoiusly not handle more in case of 32-bit OIDs ... Stefan > > > U tst026.stable.out > Index: tst026.stable.out > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/mal/Tests/tst026.stable.out,v > retrieving revision 1.5 > retrieving revision 1.6 > diff -u -d -r1.5 -r1.6 > --- tst026.stable.out 28 Aug 2008 05:59:11 -0000 1.5 > +++ tst026.stable.out 6 Sep 2008 11:21:53 -0000 1.6 > @@ -18,24 +18,27 @@ > cnt := 0:lng; # 2 cnt:lng := _5:lng > barrier d := true; # 3 d:bit := _7:bit {J11} > f := 1; # 4 f:int := _9:int > - cnt := aggr.count(b); # 5 cnt:lng := aggr.count(b:bat[:oid,:int]) {U} > + cnt := aggr.count(b); # 5 cnt:lng := ALGcount_bat(b:bat[:oid,:int]) > redo d := false; # 6 d:bit := _10:bit {J4} > barrier e := true; # 7 e:bit := _7:bit {J9} > g := 1; # 8 g:int := _9:int > exit e; # 9 e:bit > io.print(g); # 10 _13:void := IOprint_val(g:int) > exit d; # 11 d:bit > - cnt := aggr.count(b); # 12 cnt:lng := aggr.count(b:bat[:oid,:int]) {U} > + cnt := aggr.count(b); # 12 cnt:lng := ALGcount_bat(b:bat[:oid,:int]) > id := calc.oid(cnt); # 13 id:oid := CALClng2oid(cnt:lng) > io.print(f); # 14 _15:void := IOprint_val(f:int) > io.print(g); # 15 _16:void := IOprint_val(g:int) > end foo; # 16 > > function user.main():void; # 0 main:void := user.main() > - user.foo(); # 1 _1:void := user.foo() {U} > + user.foo(); # 1 _1:void := user.foo() > end main; # 2 > +[ 1 ] > +[ 1 ] > +[ 1 ] > > -# 12:49:32 > > -# 12:49:32 > Done. > -# 12:49:32 > > +# 08:57:31 > > +# 08:57:31 > Done. > +# 08:57:31 > > > > U tst1505.stable.out > Index: tst1505.stable.out > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/mal/Tests/tst1505.stable.out,v > retrieving revision 1.25 > retrieving revision 1.26 > diff -u -d -r1.25 -r1.26 > --- tst1505.stable.out 9 Aug 2008 16:52:00 -0000 1.25 > +++ tst1505.stable.out 6 Sep 2008 11:21:56 -0000 1.26 > @@ -82,9 +82,9 @@ > io.print(y); # 18 _23:void := IOprint_val(y:bat[:oid,:dbl]) > z := batcalc.<(y,2:dbl); # 19 z:bat[:oid,:bit] := CMD_LT_dbl_cst(y:bat[:oid,:dbl], _25:dbl) {G} > io.print(z); # 20 _26:void := IOprint_val(z:bat[:oid,:bit]) > - c := aggr.count(z); # 21 c:int := ALGcount_bat(z:bat[:oid,:bit]) > + c := aggr.count(z); # 21 c:lng := ALGcount_bat(z:bat[:oid,:bit]) > io.print("count"); # 22 _28:void := IOprint_val(_29:str) > - io.print(c); # 23 _30:void := IOprint_val(c:int) > + io.print(c); # 23 _30:void := IOprint_val(c:lng) > x := bat.new(:oid,:bit); # 24 x:bat[:oid,:bit] := CMDBATnew(_2:oid, _32:bit) {G} > bat.append(x,true); # 25 _33:bat[:bit,:any] := BKCappend_val_wrap(x:bat[:oid,:bit], _34:bit) {G} > bat.append(x,false); # 26 _35:bat[:bit,:any] := BKCappend_val_wrap(x:bat[:oid,:bit], _36:bit) {G} > > U tst903.stable.out > Index: tst903.stable.out > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/mal/Tests/tst903.stable.out,v > retrieving revision 1.52 > retrieving revision 1.53 > diff -u -d -r1.52 -r1.53 > --- tst903.stable.out 12 Aug 2008 14:08:50 -0000 1.52 > +++ tst903.stable.out 6 Sep 2008 11:22:05 -0000 1.53 > @@ -151,22 +151,22 @@ > t1 := alarm.usec(); # 20 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 21 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#copy %d",d0); # 22 _25:void := IOprint_formatted_lng(_26:str, d0:lng) > - cnt := aggr.count(c); # 23 cnt:int := ALGcount_bat(c:bat[:oid,:lng]) > - io.printf("#count %d\n",cnt); # 24 _28:void := IOprint_formatted_int(_29:str, cnt:int) > + cnt := aggr.count(c); # 23 cnt:lng := ALGcount_bat(c:bat[:oid,:lng]) > + io.printf("#count %d\n",cnt); # 24 _28:void := IOprint_formatted_lng(_29:str, cnt:lng) > t0 := alarm.usec(); # 25 t0:lng := ALARMusec() > z := algebra.select(b,25:lng,25:lng);# 26 z:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], _31:lng, _31:lng) {G} > t1 := alarm.usec(); # 27 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 28 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select none %d",d0); # 29 _32:void := IOprint_formatted_lng(_33:str, d0:lng) > - cnt := aggr.count(z); # 30 cnt:int := ALGcount_bat(z:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 31 _34:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z); # 30 cnt:lng := ALGcount_bat(z:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 31 _34:void := IOprint_formatted_lng(_35:str, cnt:lng) > t0 := alarm.usec(); # 32 t0:lng := ALARMusec() > z2 := algebra.select(b,mi,mx); # 33 z2:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], mi:lng, mx:lng) {G} > t1 := alarm.usec(); # 34 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 35 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select all %d",d0); # 36 _37:void := IOprint_formatted_lng(_38:str, d0:lng) > - cnt := aggr.count(z2); # 37 cnt:int := ALGcount_bat(z2:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 38 _39:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z2); # 37 cnt:lng := ALGcount_bat(z2:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 38 _39:void := IOprint_formatted_lng(_35:str, cnt:lng) > rng := calc.-(mx,mi); # 39 rng:lng := CALCbinarySUBlnglng(mx:lng, mi:lng) > r2 := calc./(rng,20); # 40 r2:lng := CALCbinarycheckDIVlngint(rng:lng, _42:int) > r3 := calc.+(mi,r2); # 41 r3:lng := CALCbinaryADDlnglng(mi:lng, r2:lng) > @@ -175,8 +175,8 @@ > t1 := alarm.usec(); # 44 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 45 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.05 %d",d0); # 46 _45:void := IOprint_formatted_lng(_46:str, d0:lng) > - cnt := aggr.count(z3); # 47 cnt:int := ALGcount_bat(z3:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 48 _47:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z3); # 47 cnt:lng := ALGcount_bat(z3:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 48 _47:void := IOprint_formatted_lng(_35:str, cnt:lng) > r2 := calc./(rng,10); # 49 r2:lng := CALCbinarycheckDIVlngint(rng:lng, _48:int) > r3 := calc.+(mi,r2); # 50 r3:lng := CALCbinaryADDlnglng(mi:lng, r2:lng) > t0 := alarm.usec(); # 51 t0:lng := ALARMusec() > @@ -184,8 +184,8 @@ > t1 := alarm.usec(); # 53 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 54 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.1 %d",d0); # 55 _50:void := IOprint_formatted_lng(_51:str, d0:lng) > - cnt := aggr.count(z4); # 56 cnt:int := ALGcount_bat(z4:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 57 _52:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z4); # 56 cnt:lng := ALGcount_bat(z4:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 57 _52:void := IOprint_formatted_lng(_35:str, cnt:lng) > r2 := calc./(rng,5); # 58 r2:lng := CALCbinarycheckDIVlngint(rng:lng, _53:int) > r3 := calc.+(mi,r2); # 59 r3:lng := CALCbinaryADDlnglng(mi:lng, r2:lng) > t0 := alarm.usec(); # 60 t0:lng := ALARMusec() > @@ -193,49 +193,49 @@ > t1 := alarm.usec(); # 62 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 63 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.2 %d",d0); # 64 _55:void := IOprint_formatted_lng(_56:str, d0:lng) > - cnt := aggr.count(z5); # 65 cnt:int := ALGcount_bat(z5:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 66 _57:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z5); # 65 cnt:lng := ALGcount_bat(z5:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 66 _57:void := IOprint_formatted_lng(_35:str, cnt:lng) > r3 := calc.+(r3,r2); # 67 r3:lng := CALCbinaryADDlnglng(r3:lng, r2:lng) > t0 := alarm.usec(); # 68 t0:lng := ALARMusec() > z6 := algebra.select(b,mi,r3); # 69 z6:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], mi:lng, r3:lng) {G} > t1 := alarm.usec(); # 70 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 71 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.4 %d",d0); # 72 _59:void := IOprint_formatted_lng(_60:str, d0:lng) > - cnt := aggr.count(z6); # 73 cnt:int := ALGcount_bat(z6:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 74 _61:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z6); # 73 cnt:lng := ALGcount_bat(z6:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 74 _61:void := IOprint_formatted_lng(_35:str, cnt:lng) > r3 := calc.+(r3,r2); # 75 r3:lng := CALCbinaryADDlnglng(r3:lng, r2:lng) > t0 := alarm.usec(); # 76 t0:lng := ALARMusec() > z7 := algebra.select(b,mi,r3); # 77 z7:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], mi:lng, r3:lng) {G} > t1 := alarm.usec(); # 78 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 79 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.6 %d",d0); # 80 _63:void := IOprint_formatted_lng(_64:str, d0:lng) > - cnt := aggr.count(z7); # 81 cnt:int := ALGcount_bat(z7:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 82 _65:void := IOprint_formatted_int(_35:str, cnt:int) > + cnt := aggr.count(z7); # 81 cnt:lng := ALGcount_bat(z7:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 82 _65:void := IOprint_formatted_lng(_35:str, cnt:lng) > r3 := calc.+(r3,r2); # 83 r3:lng := CALCbinaryADDlnglng(r3:lng, r2:lng) > t0 := alarm.usec(); # 84 t0:lng := ALARMusec() > z8 := algebra.select(b,mi,r3); # 85 z8:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], mi:lng, r3:lng) {G} > t1 := alarm.usec(); # 86 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 87 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 0.8 %d",d0); # 88 _67:void := IOprint_formatted_lng(_68:str, d0:lng) > - cnt := aggr.count(z8); # 89 cnt:int := ALGcount_bat(z8:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 90 _69:void := IOprint_formatted_int(_70:str, cnt:int) > + cnt := aggr.count(z8); # 89 cnt:lng := ALGcount_bat(z8:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 90 _69:void := IOprint_formatted_lng(_70:str, cnt:lng) > r3 := calc.+(r3,r2); # 91 r3:lng := CALCbinaryADDlnglng(r3:lng, r2:lng) > t0 := alarm.usec(); # 92 t0:lng := ALARMusec() > z9 := algebra.select(b,mi,r3); # 93 z9:bat[:oid,:lng] := ALGselect(b:bat[:oid,:lng], mi:lng, r3:lng) {G} > t1 := alarm.usec(); # 94 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); # 95 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#select 1.0 %d",d0); # 96 _72:void := IOprint_formatted_lng(_73:str, d0:lng) > - cnt := aggr.count(z9); # 97 cnt:int := ALGcount_bat(z9:bat[:oid,:lng]) > - io.printf(" count %d\n",cnt); # 98 _74:void := IOprint_formatted_int(_70:str, cnt:int) > + cnt := aggr.count(z9); # 97 cnt:lng := ALGcount_bat(z9:bat[:oid,:lng]) > + io.printf(" count %d\n",cnt); # 98 _74:void := IOprint_formatted_lng(_70:str, cnt:lng) > t0 := alarm.usec(); # 99 t0:lng := ALARMusec() > sr := bat.reverse(b); #100 sr:bat[:lng,:oid] := BKCreverse(b:bat[:oid,:lng]) {G} > s := algebra.sort(sr); #101 s:bat[:lng,:oid] := ALGhsort(sr:bat[:lng,:oid]) {G} > t1 := alarm.usec(); #102 t1:lng := ALARMusec() > d0 := calc.-(t1,t0); #103 d0:lng := CALCbinarySUBlnglng(t1:lng, t0:lng) > io.printf("#head sort %d",d0); #104 _77:void := IOprint_formatted_lng(_78:str, d0:lng) > - cnt := aggr.count(s); #105 cnt:int := ALGcount_bat(s:bat[:lng,:oid]) > - io.printf(" count %d\n",cnt); #106 _79:void := IOprint_formatted_int(_70:str, cnt:int) > - cnt := aggr.count(z9); #107 cnt:int := ALGcount_bat(z9:bat[:oid,:lng]) > + cnt := aggr.count(s); #105 cnt:lng := ALGcount_bat(s:bat[:lng,:oid]) > + io.printf(" count %d\n",cnt); #106 _79:void := IOprint_formatted_lng(_70:str, cnt:lng) > + cnt := aggr.count(z9); #107 cnt:lng := ALGcount_bat(z9:bat[:oid,:lng]) > t0 := alarm.usec(); #108 t0:lng := ALARMusec() > _87 := bat.new(nil:oid,nil:lng); #109 _87:bat[:oid,:lng] := CMDBATnew(_88:oid, _89:lng) {G} > barrier (_91,_92,_93) := bat.newIterator(b);#110 (_91:lng, _92:oid, _93:lng) := CHPbunIterator(b:bat[:oid,:lng]) {J115} > > U tst220.stable.out > Index: tst220.stable.out > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/mal/Tests/tst220.stable.out,v > retrieving revision 1.39 > retrieving revision 1.40 > diff -u -d -r1.39 -r1.40 > --- tst220.stable.out 18 Aug 2008 17:54:50 -0000 1.39 > +++ tst220.stable.out 6 Sep 2008 11:22:03 -0000 1.40 > @@ -93,7 +93,7 @@ > io.printf("after assignment refcount =%d[2]\n",i);# 12 _15:void := IOprint_formatted_int(_16:str, i:int) > #re-use a bat variable > b3 := b; # 14 b3:bat[:int,:str] := b:bat[:int,:str] {G} > - cnt := aggr.count(b3); # 15 cnt:int := ALGcount_bat(b3:bat[:int,:str]) > + cnt := aggr.count(b3); # 15 cnt:lng := ALGcount_bat(b3:bat[:int,:str]) > # forced use > i := bbp.getLRefCount(b); # 17 i:int := CMDgetBATlrefcnt(b:bat[:int,:str]) > io.printf("after 2nd assignment refcount =%d[3]\n",i);# 18 _21:void := IOprint_formatted_int(_22:str, i:int) > > U tst280.stable.out > Index: tst280.stable.out > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/mal/Tests/tst280.stable.out,v > retrieving revision 1.28 > retrieving revision 1.29 > diff -u -d -r1.28 -r1.29 > --- tst280.stable.out 12 Aug 2008 14:08:47 -0000 1.28 > +++ tst280.stable.out 6 Sep 2008 11:22:04 -0000 1.29 > @@ -47,9 +47,9 @@ > function user.tst(A2:bat[:oid,:int],A3:bat[:oid,:int]):bat[:oid,:int];# 0 tst:bat[:oid,:int] := user.tst(A2:bat[:oid,:int], A3:bat[:oid,:int]) {G} > io.print(A2); # 1 _3:void := IOprint_val(A2:bat[:oid,:int]) > resB := bat.new(:oid,:int); # 2 resB:bat[:oid,:int] := CMDBATnew(_5:oid, _6:int) {G} > - lim := aggr.count(A2); # 3 lim:int := ALGcount_bat(A2:bat[:oid,:int]) > - io.printf("count %d\n",lim); # 4 _8:void := IOprint_formatted_int(_9:str, lim:int) > - l := calc.lng(lim); # 5 l:lng := CALCint2lng(lim:int) > + lim := aggr.count(A2); # 3 lim:lng := ALGcount_bat(A2:bat[:oid,:int]) > + io.printf("count %d\n",lim); # 4 _8:void := IOprint_formatted_lng(_9:str, lim:lng) > + l := calc.lng(lim); # 5 l:lng := CALClng2lng(lim:lng) > barrier (mloop,m) := language.newRange(0:lng);# 6 (mloop:bit, m:lng) := RNGnewRange_lng(_13:lng) {J17} > io.printf("loopindex %d\n",m); # 7 _14:void := IOprint_formatted_lng(_15:str, m:lng) > B2 := algebra.fetch(A2,m); # 8 B2:int := ALGfetch(A2:bat[:oid,:int], m:lng) > > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's challenge > Build the coolest Linux based applications with Moblin SDK & win great prizes > Grand prize is a trip for two to an Open Source event anywhere in the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Monetdb-checkins mailing list > Monetdb-checkins(a)lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/monetdb-checkins > > -- | Dr. Stefan Manegold | mailto:Stefan.Manegold@cwi.nl | | CWI, P.O.Box 94079 | http://www.cwi.nl/~manegold/ | | 1090 GB Amsterdam | Tel.: +31 (20) 592-4212 | | The Netherlands | Fax : +31 (20) 592-4312 |

2 1

Re: [Monetdb-developers] [Monetdb-checkins] MonetDB5/src/modules/kernel algebra.mx, MonetDB_5-6, 1.196, 1.196.2.1
by Sjoerd Mullender 02 Sep '08

02 Sep '08

When propagating I noticed this. This change, and the accompanying change in SQL, is not allowed on the stable branch. With this change, a new SQL cannot work with an old MonetDB5 and that makes this change unacceptable. If you want to fix a bug than you will just have to work around it on the SQL side without adding new features in MonetDB5. Your release manager. Sorry Niels. Niels Nes wrote: > Update of /cvsroot/monetdb/MonetDB5/src/modules/kernel > In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv28287/src/modules/kernel > > Modified Files: > Tag: MonetDB_5-6 > algebra.mx > Log Message: > added thetauselect/thetaselect these correctly handle nil cases (the sql semantics way) > > > U algebra.mx > Index: algebra.mx > =================================================================== > RCS file: /cvsroot/monetdb/MonetDB5/src/modules/kernel/algebra.mx,v > retrieving revision 1.196 > retrieving revision 1.196.2.1 > diff -u -d -r1.196 -r1.196.2.1 > --- algebra.mx 24 Apr 2008 20:28:13 -0000 1.196 > +++ algebra.mx 30 Aug 2008 06:50:36 -0000 1.196.2.1 > @@ -111,6 +111,10 @@ > ordered domain of values, tuples with 'nil' values > are NEVER returned by the range select."; > > +command thetaselect(b:bat[:any_1,:any_2], val:any_2, op:str) :bat[:any_1,:any_2] > +address ALGthetaselect > +comment "The theta (<=,<,=,>,>=) select()"; > + > command select(b:bat[:any_1,:any_2], low:any_2, > high:any_2, li:bit, hi:bit) :bat[:any_1,:any_2] > address ALGselectInclusive > @@ -149,6 +153,7 @@ > command select(b:bat[:any_2,:void], low:any_2) > :bat[:any_2,:void] > address ALGselect1Head; > + > command select(b:bat[:any_2,:void], low:any_2, high:any_2) > :bat[:any_2,:void] > address ALGselectHead; > @@ -186,6 +191,10 @@ > address ALGuselectInclusive > comment "See select() but limited to head values"; > > +command thetauselect(b:bat[:any_1,:any_2], val:any_2, op:str) :bat[:any_1,:oid] > +address ALGthetauselect > +comment "The theta (<=,<,=,>,>=) select() limited to head values"; > + > command uselect(b:bat[:any_1,:any_2], low:any_2, high:any_2):bat[:any_1,:oid] > address ALGuselect; > command uselect(b:bat[:any_1,:any_2], value:any_2) :bat[:any_1,:oid] > @@ -942,8 +951,10 @@ > algebra_export str ALGselect1(int *result, int *bid, ptr value); > algebra_export str ALGselect1Head(int *result, int *bid, ptr value); > algebra_export str ALGuselect1(int *result, int *bid, ptr value); > +algebra_export str ALGthetauselect(int *result, int *bid, ptr value, str *op); > algebra_export str ALGantiuselect1(int *result, int *bid, ptr value); > algebra_export str ALGselect(int *result, int *bid, ptr low, ptr high); > +algebra_export str ALGthetaselect(int *result, int *bid, ptr low, str *op); > algebra_export str ALGselectHead(int *result, int *bid, ptr low, ptr high); > algebra_export str ALGuselect(int *result, int *bid, ptr low, ptr high); > algebra_export str ALGselectInclusive(int *result, int *bid, ptr low, ptr high, bit *lin, bit *rin); > @@ -2495,6 +2506,49 @@ > } > > str > +ALGthetaselect(int *result, int *bid, ptr val, str *OP) > +{ > + ptr nilptr; > + BAT *b, *bn = NULL; > + > + if ((b = BATdescriptor(*bid)) == NULL) { > + throw(MAL, "algebra.thetaselect", "Cannot access descriptor"); > + } > + nilptr = ATOMnilptr(b->ttype); > + @:derefStr(b,t,val);@ > + if (ATOMcmp(b->ttype, val, nilptr) == 0) { > + bn = BATnew(b->htype,b->ttype, 0); > + } else { > + char *op = *OP; > + bit lin = TRUE, rin = TRUE; > + ptr low = nilptr, high = nilptr; > + > + if (op[0] == '=') { > + low = val; > + high = NULL; > + } else if (op[0] == '<') { > + high = val; > + rin = (op[1] == '='); > + } else if (op[0] == '>') { > + low = val; > + lin = (op[1] == '='); > + } else { > + BBPreleaseref(b->batCacheid); > + throw(MAL, "algebra.thetaselect", "unknown operator"); > + } > + CMDselect_(&bn, b, low, high, &lin, &rin); > + } > + BBPreleaseref(b->batCacheid); > + if (bn) { > + if (!(bn->batDirty&2)) bn = BATsetaccess(bn, BAT_READ); > + *result = bn->batCacheid; > + BBPkeepref(*result); > + return MAL_SUCCEED; > + } > + throw(MAL, "algebra.thetaselect", "GDKerror"); > +} > + > +str > ALGselectNotNil(int *result, int *bid) > { > BAT *b, *bn = NULL; > @@ -2567,6 +2621,49 @@ > } > > str > +ALGthetauselect(int *result, int *bid, ptr val, str *OP) > +{ > + ptr nilptr; > + BAT *b, *bn = NULL; > + > + if ((b = BATdescriptor(*bid)) == NULL) { > + throw(MAL, "algebra.thetauselect", "Cannot access descriptor"); > + } > + nilptr = ATOMnilptr(b->ttype); > + @:derefStr(b,t,val);@ > + if (ATOMcmp(b->ttype, val, nilptr) == 0) { > + bn = BATnew(b->htype,TYPE_void, 0); > + } else { > + char *op = *OP; > + bit lin = TRUE, rin = TRUE; > + ptr low = nilptr, high = nilptr; > + > + if (op[0] == '=') { > + low = val; > + high = NULL; > + } else if (op[0] == '<') { > + high = val; > + rin = (op[1] == '='); > + } else if (op[0] == '>') { > + low = val; > + lin = (op[1] == '='); > + } else { > + BBPreleaseref(b->batCacheid); > + throw(MAL, "algebra.thetauselect", "unknown operator"); > + } > + CMDuselect_(&bn, b, low, high, &lin, &rin); > + } > + BBPreleaseref(b->batCacheid); > + if (bn) { > + if (!(bn->batDirty&2)) bn = BATsetaccess(bn, BAT_READ); > + *result = bn->batCacheid; > + BBPkeepref(*result); > + return MAL_SUCCEED; > + } > + throw(MAL, "algebra.thetauselect", "GDKerror"); > +} > + > +str > ALGselectInclusive(int *result, int *bid, ptr low, ptr high, bit *lin, bit *rin) > { > BAT *b, *bn = NULL; > @@ -3776,12 +3873,9 @@ > if( ATOMvarsized(b->ttype) || b->htype != TYPE_void){ > bn= BATwcopy(b); > } else { > - bn= BATnew(b->htype,b->ttype,BATcount(b)); > - bn->H->heap.free = headsize(bn,BATcount(b)); > - bn->T->heap.free = tailsize(bn,BATcount(b)); > + bn = BATnew(b->htype,b->ttype,BATcount(b)); > BATsetcount(bn,BATcount(b)); > - > - bn->tsorted= FALSE; > + bn->tsorted = FALSE; > BATkey(bn,FALSE); > /* head is void */ > BATseqbase(bn, b->hseqbase); > > > ------------------------------------------------------------------------- > This SF.Net email is sponsored by the Moblin Your Move Developer's challenge > Build the coolest Linux based applications with Moblin SDK & win great prizes > Grand prize is a trip for two to an Open Source event anywhere in the world > http://moblin-contest.org/redirect.php?banner_id=100&url=/ > _______________________________________________ > Monetdb-checkins mailing list > Monetdb-checkins(a)lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/monetdb-checkins -- Sjoerd Mullender

1 0

[Monetdb-developers] Using the MAPI library
by Erin's Ghost 01 Sep '08

01 Sep '08

hello, do you have some sort of tutorial on how to build the MAPI library on Windows (for use in an external program that connects to monet) ? thanks, erin.

2 1