X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/7bcd4cc9d936caa1d23579f7aca67e68fade2a36..6760cb07d6b57be16928d95339d71e57c4e24f36:/src/bindings/ruby/simgrid.rb diff --git a/src/bindings/ruby/simgrid.rb b/src/bindings/ruby/simgrid.rb index c618f33a61..32fbbe2814 100644 --- a/src/bindings/ruby/simgrid.rb +++ b/src/bindings/ruby/simgrid.rb @@ -5,11 +5,11 @@ # This program is free software; you can redistribute it and/or modify it # under the terms of the license (GNU LGPL) which comes with this package. */ # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # -require 'simgrid_ruby' +require 'libsimgrid.so' require 'thread' ####################################### -# Semaphore +# Semaphore ####################################### class Semaphore @@ -82,7 +82,7 @@ class MSG::Process < Thread end def start() - @schedBegin.acquire + @schedBegin.acquire MSG::debug("Let's execute the main() of the Ruby process") main(@pargs) @schedEnd.release @@ -125,18 +125,17 @@ class MSG::Process < Thread processGetHost(self) end -# The Rest of Methods !!! To be Continued ... FIXME: what's missing? end ############################################ # Task Extend from the native Class RbTask ############################################ class MSG::Task < MSG::RbTask - + def initialize(*args) - super() + #Nothing todo end - def setData(value) + def join(value) super(self,value) end @@ -145,15 +144,19 @@ class MSG::Task < MSG::RbTask end def name - super(self) + super(self) end def compSize - super(self) + super(self) end def send(mailbox) - super(self,mailbox) + super(self,mailbox) + end + + def receive(mailbox) + super(self) end def source @@ -165,7 +168,7 @@ class MSG::Task < MSG::RbTask end def listen(t_alias) - super(t_alias) + super(self) end def execute @@ -173,22 +176,42 @@ class MSG::Task < MSG::RbTask end def listenFromHost(t_alias,host) - super(t_alias,host) + super(self) end def setPriority(priority) super(self,priority) end - def cancel() + def cancel super(self) end + def hasData + super(self) + end + end + #################################################### # Host Extend from the native Class RbHost #################################################### class MSG::Host < MSG::RbHost + + attr_reader :data + def initialize(*ars) + @data = 1 + p "Host Initializer" + end + + def data() + return @data + end + + def setData(value) + @data = value + end + def getByName(name) super(name) end @@ -205,10 +228,6 @@ class MSG::Host < MSG::RbHost super(self) end - def setData(data) - super(self,data) - end - def isAvail super(self) end @@ -225,4 +244,4 @@ end ######################### # Main chunck ######################### -MSG.init(ARGV) \ No newline at end of file +MSG.init(ARGV)