diff options
-rw-r--r-- | .gitignore | 1 | ||||
-rw-r--r-- | generator/generator_ruby.ml | 105 | ||||
-rw-r--r-- | ruby/Makefile.am | 1 | ||||
-rw-r--r-- | ruby/README.rdoc | 4 | ||||
-rw-r--r-- | ruby/Rakefile.in | 15 | ||||
-rw-r--r-- | ruby/doc/site/index.html | 8 |
6 files changed, 128 insertions, 6 deletions
@@ -281,6 +281,7 @@ rescue/stamp-virt-rescue.pod rescue/virt-rescue rescue/virt-rescue.1 ruby/bindtests.rb +ruby/doc/site/api ruby/examples/guestfs-ruby.3 ruby/examples/stamp-guestfs-ruby.pod ruby/ext/guestfs/extconf.h diff --git a/generator/generator_ruby.ml b/generator/generator_ruby.ml index b237c7f0..a2a112ae 100644 --- a/generator/generator_ruby.ml +++ b/generator/generator_ruby.ml @@ -57,7 +57,8 @@ static VALUE e_Error; /* used for all errors */ static void ruby_event_callback_wrapper (guestfs_h *g, void *data, uint64_t event, int event_handle, int flags, const char *buf, size_t buf_len, const uint64_t *array, size_t array_len); static VALUE **get_all_event_callbacks (guestfs_h *g, size_t *len_rtn); -static void ruby_guestfs_free (void *gvp) +static void +ruby_guestfs_free (void *gvp) { guestfs_h *g = gvp; @@ -84,7 +85,17 @@ static void ruby_guestfs_free (void *gvp) } } -static VALUE ruby_guestfs_create (VALUE m) +/* + * call-seq: + * Guestfs::Guestfs.new() -> Guestfs::Guestfs + * + * Call + * +guestfs_create+[http://libguestfs.org/guestfs.3.html#guestfs_create] + * to create a new libguestfs handle. The handle is represented in + * Ruby as an instance of the Guestfs::Guestfs class. + */ +static VALUE +ruby_guestfs_create (VALUE m) { guestfs_h *g; @@ -101,7 +112,16 @@ static VALUE ruby_guestfs_create (VALUE m) return Data_Wrap_Struct (c_guestfs, NULL, ruby_guestfs_free, g); } -static VALUE ruby_guestfs_close (VALUE gv) +/* + * call-seq: + * g.close() -> nil + * + * Call + * +guestfs_close+[http://libguestfs.org/guestfs.3.html#guestfs_close] + * to close the libguestfs handle. + */ +static VALUE +ruby_guestfs_close (VALUE gv) { guestfs_h *g; Data_Get_Struct (gv, guestfs_h, g); @@ -112,6 +132,14 @@ static VALUE ruby_guestfs_close (VALUE gv) return Qnil; } +/* + * call-seq: + * g.set_event_callback(cb, event_bitmask) -> event_handle + * + * Call + * +guestfs_set_event_callback+[http://libguestfs.org/guestfs.3.html#guestfs_set_event_callback] + * to register an event callback. This returns an event handle. + */ static VALUE ruby_set_event_callback (VALUE gv, VALUE cbv, VALUE event_bitmaskv) { @@ -143,6 +171,14 @@ ruby_set_event_callback (VALUE gv, VALUE cbv, VALUE event_bitmaskv) return INT2NUM (eh); } +/* + * call-seq: + * g.delete_event_callback(event_handle) -> nil + * + * Call + * +guestfs_delete_event_callback+[http://libguestfs.org/guestfs.3.html#guestfs_delete_event_callback] + * to delete an event callback. + */ static VALUE ruby_delete_event_callback (VALUE gv, VALUE event_handlev) { @@ -231,8 +267,67 @@ get_all_event_callbacks (guestfs_h *g, size_t *len_rtn) "; List.iter ( - fun (name, (ret, args, optargs as style), _, _, _, _, _) -> - pr "static VALUE ruby_guestfs_%s (VALUE gv" name; + fun (name, (ret, args, optargs as style), _, flags, _, shortdesc, longdesc) -> + (* Generate rdoc. *) + if not (List.mem NotInDocs flags); then ( + let doc = replace_str longdesc "C<guestfs_" "C<g." in + let doc = + if optargs <> [] then + doc ^ "\n\nOptional arguments are supplied in the final hash parameter, which is a hash of the argument name to its value. Pass an empty {} for no optional arguments." + else doc in + let doc = + if List.mem ProtocolLimitWarning flags then + doc ^ "\n\n" ^ protocol_limit_warning + else doc in + let doc = + if List.mem DangerWillRobinson flags then + doc ^ "\n\n" ^ danger_will_robinson + else doc in + let doc = + match deprecation_notice flags with + | None -> doc + | Some txt -> doc ^ "\n\n" ^ txt in + let doc = pod2text ~width:60 name doc in + let doc = String.concat "\n * " doc in + let doc = trim doc in + + let args = List.map name_of_argt args in + let args = if optargs <> [] then args @ ["{optargs...}"] else args in + let args = String.concat ", " args in + + let ret = + match ret with + | RErr -> "nil" + | RBool _ -> "[True|False]" + | RInt _ -> "fixnum" + | RInt64 _ -> "fixnum" + | RConstString _ -> "string" + | RConstOptString _ -> "string" + | RString _ -> "string" + | RBufferOut _ -> "string" + | RStruct _ + | RHashtable _ -> "hash" + | RStringList _ + | RStructList _ -> "list" in + + pr "\ +/* + * call-seq: + * g.%s(%s) -> %s + * + * %s + * + * %s + * + * (For the C API documentation for this function, see + * +guestfs_%s+[http://libguestfs.org/guestfs.3.html#guestfs_%s]). + */ +" name args ret shortdesc doc name name + ); + + (* Generate the function. *) + pr "static VALUE\n"; + pr "ruby_guestfs_%s (VALUE gv" name; List.iter (fun arg -> pr ", VALUE %sv" (name_of_argt arg)) args; (* XXX This makes the hash mandatory, meaning that you have * to specify {} for no arguments. We could make it so this diff --git a/ruby/Makefile.am b/ruby/Makefile.am index cd2d4ed0..9df33992 100644 --- a/ruby/Makefile.am +++ b/ruby/Makefile.am @@ -50,6 +50,7 @@ TESTS_ENVIRONMENT = \ all: $(generator_built) rake build + rake rdoc RUBY_SITELIB := $(shell ruby -rrbconfig -e "puts Config::CONFIG['sitelibdir']") RUBY_SITEARCH := $(shell ruby -rrbconfig -e "puts Config::CONFIG['sitearchdir']") diff --git a/ruby/README.rdoc b/ruby/README.rdoc new file mode 100644 index 00000000..b1ffb269 --- /dev/null +++ b/ruby/README.rdoc @@ -0,0 +1,4 @@ += Ruby bindings for libguestfs + +The module Guestfs provides Ruby bindings for +{the libguestfs API}[http://libguestfs.org/guestfs.3.html]. diff --git a/ruby/Rakefile.in b/ruby/Rakefile.in index e77b0ebd..ccbcae12 100644 --- a/ruby/Rakefile.in +++ b/ruby/Rakefile.in @@ -60,10 +60,23 @@ Rake::TestTask.new(:test) do |t| end task :test => :build +RDOC_FILES = FileList[ + "README.rdoc", + "lib/**/*.rb", + "ext/**/*.[ch]" +] + Rake::RDocTask.new do |rd| rd.main = "README.rdoc" rd.rdoc_dir = "doc/site/api" - rd.rdoc_files.include("README.rdoc", "lib/**/*.rb", "ext/**/*.[ch]") + rd.rdoc_files.include(RDOC_FILES) +end + +Rake::RDocTask.new(:ri) do |rd| + rd.main = "README.rdoc" + rd.rdoc_dir = "doc/ri" + rd.options << "--ri-system" + rd.rdoc_files.include(RDOC_FILES) end # Package tasks diff --git a/ruby/doc/site/index.html b/ruby/doc/site/index.html new file mode 100644 index 00000000..b64b8121 --- /dev/null +++ b/ruby/doc/site/index.html @@ -0,0 +1,8 @@ +<html> +<head><title>Ruby documentation for libguestfs</title></head> +<body> +<p> + <a href="api/index.html">Ruby API documentation for libguestfs</a> +</p> +</body> +</html> |