rmagick 3.2.0 → 4.3.0

data/ext/RMagick/rminfo.c

@@ -13,33 +13,10 @@
 #include "rmagick.h"
 
 
-/*
- *  Define functions to get/set attributes in Image::Info that
- *  use the Get/SetImageOption API.
-*/
-//! Option attribute reader. For Image::Info.
-#define OPTION_ATTR_READER(opt, key) \
-    VALUE Info_##opt(VALUE self)\
-    {\
-        return get_option(self, #key);\
-    }
-//! Option attribute writer. For Image::Info.
-#define OPTION_ATTR_WRITER(opt, key) \
-    VALUE Info_##opt##_eq(VALUE self, VALUE string)\
-    {\
-        return set_option(self, #key, string);\
-    }
-//! Option attribute accessor. For Image::Info.
-#define OPTION_ATTR_ACCESSOR(opt, key)\
-    OPTION_ATTR_READER(opt, key)\
-    OPTION_ATTR_WRITER(opt, key)
-
-
 /**
  * Return the value of the specified option.
  *
- * Ruby usage:
- *   - @verbatim Info#get_option(key) @endverbatim
+ * No Ruby usage (internal function)
  *
  * @param self this object
  * @param key the option key
@@ -65,8 +42,7 @@ get_option(VALUE self, const char *key)
  * Set the specified option to this value. If the value is nil just unset any
  * current value.
  *
- * Ruby usage:
- *   - @verbatim Info#set_option(key,string) @endverbatim
+ * No Ruby usage (internal function)
  *
  * @param self this object
  * @param key the option key
@@ -77,18 +53,19 @@ static VALUE
 set_option(VALUE self, const char *key, VALUE string)
 {
     Info *info;
-    char *value;
 
     Data_Get_Struct(self, Info, info);
 
     if (NIL_P(string))
     {
-        (void) DeleteImageOption(info, key);
+        DeleteImageOption(info, key);
     }
     else
     {
-        value = StringValuePtr(string);
-        (void) SetImageOption(info, key, value);
+        char *value;
+
+        value = StringValueCStr(string);
+        SetImageOption(info, key, value);
     }
     return string;
 }
@@ -110,29 +87,30 @@ set_option(VALUE self, const char *key, VALUE string)
 static VALUE set_color_option(VALUE self, const char *option, VALUE color)
 {
     Info *info;
-    char *name;
     PixelColor pp;
-    ExceptionInfo *exception;
     MagickBooleanType okay;
 
     Data_Get_Struct(self, Info, info);
 
     if (NIL_P(color))
     {
-        (void) DeleteImageOption(info, option);
+        DeleteImageOption(info, option);
     }
     else
     {
-        name = StringValuePtr(color);
+        char *name;
+        ExceptionInfo *exception;
+
+        name = StringValueCStr(color);
         exception = AcquireExceptionInfo();
         okay = QueryColorCompliance(name, AllCompliance, &pp, exception);
-        (void) DestroyExceptionInfo(exception);
+        DestroyExceptionInfo(exception);
         if (!okay)
         {
             rb_raise(rb_eArgError, "invalid color name `%s'", name);
         }
 
-        (void) SetImageOption(info, option, name);
+        SetImageOption(info, option, name);
     }
 
     return color;
@@ -188,81 +166,79 @@ static VALUE get_dbl_option(VALUE self, const char *option)
 static VALUE set_dbl_option(VALUE self, const char *option, VALUE value)
 {
     Info *info;
-    char buff[50];
-    double d;
-    long n;
-    int len;
 
     Data_Get_Struct(self, Info, info);
 
     if (NIL_P(value))
     {
-        (void) DeleteImageOption(info, option);
+        DeleteImageOption(info, option);
     }
     else
     {
+        char buff[50];
+        double d;
+        int len;
+        long n;
+
         d = NUM2DBL(value);
         n = floor(d);
         if (d == n)
         {
-            len = sprintf(buff, "%-10ld", n);
+            len = snprintf(buff, sizeof(buff), "%-10ld", n);
         }
         else
         {
-            len = sprintf(buff, "%-10.2f", d);
+            len = snprintf(buff, sizeof(buff), "%-10.2f", d);
         }
         memset(buff+len, '\0', sizeof(buff)-len);
-        (void) SetImageOption(info, option, buff);
+        SetImageOption(info, option, buff);
     }
 
     return value;
 }
 
 
-#if 0
 /**
- * Convert a PixelPacket to a hex-format color name.
- *
- * No Ruby usage (internal function)
+ * Get antialias value
  *
- * @param pp the pixel packet
- * @param name pointer to the name
- * @return the name
+ * @return [Boolean] true if antialias is enabled
  */
-static char *pixel_packet_to_hexname(PixelPacket *pp, char *name)
+VALUE
+Info_antialias(VALUE self)
 {
-    MagickPixel mpp;
-
-    rm_init_magickpixel(NULL, &mpp);
-    rm_set_magick_pixel_packet(pp, &mpp);
-    (void) GetColorTuple(&mpp, MagickTrue, name);
-    return name;
+    IMPLEMENT_ATTR_READER(Info, antialias, boolean);
 }
-#endif
-
 
-DEF_ATTR_ACCESSOR(Info, antialias, bool)
+/**
+ * Set antialias value
+ *
+ * @param val [Boolean] true or false
+ * @return [Boolean] the given value
+ */
+VALUE
+Info_antialias_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, antialias, boolean);
+}
 
 /** Maximum length of a format (@see Info_aref) */
 #define MAX_FORMAT_LEN 60
 
 /**
- * Get the value of an option set by Info[]=
+ * Get the value of the specified option for the specified format.
  *
- * Ruby usage:
- *   - @verbatim Info[format, key] @endverbatim
- *   - @verbatim Info[key] @endverbatim
+ * - The 2 argument form is the original form. Added support for a single
+ *   argument after ImageMagick started using Set/GetImageOption for options
+ *   that aren't represented by fields in the ImageInfo structure.
  *
- * Notes:
- *   - The 2 argument form is the original form. Added support for a single
- *     argument after ImageMagick started using Set/GetImageOption for options
- *     that aren't represented by fields in the ImageInfo structure.
+ * @overload [](format, key)
+ *   @param format [String] An image format name such as "ps" or "tiff".
+ *   @param key [String] A string that identifies the option.
  *
- * @param argc number of input arguments
- * @param argv array of input arguments
- * @param self this object
- * @return the option value
- * @see Info_aset
+ * @overload [](key)
+ *   @param key [String] A string that identifies the option.
+ *
+ * @return [String] The value of the option.
  */
 VALUE
 Info_aref(int argc, VALUE *argv, VALUE self)
@@ -287,8 +263,7 @@ Info_aref(int argc, VALUE *argv, VALUE self)
             break;
 
         case 1:
-            strncpy(fkey, StringValuePtr(argv[0]), sizeof(fkey)-1);
-            fkey[sizeof(fkey)-1] = '\0';
+            strlcpy(fkey, StringValueCStr(argv[0]), sizeof(fkey));
             break;
 
         default:
@@ -309,26 +284,23 @@ Info_aref(int argc, VALUE *argv, VALUE self)
 
 
 /**
- * Call SetImageOption
+ * Define an option. An alternative to {Info#define}.
+ * Use this method to set options for reading or writing certain image formats.
  *
- * Ruby usage:
- *   - @verbatim Info[format, key]= @endverbatim
- *   - @verbatim Info[key]= @endverbatim
+ * - Essentially the same function as {Info#define} but paired with {Info#[]}
+ * - If the value is nil it is equivalent to {Info#undefine}.
  *
- * Notes:
- *   - Essentially the same function as Info_define but paired with Info_aref
- *   - If the value is nil it is equivalent to Info_undefine. 
- *   - The 2 argument form is the original form. Added support for a single
- *     argument after ImageMagick started using Set/GetImageOption for options
- *     that aren't represented by fields in the ImageInfo structure.
- *
- * @param argc number of input arguments
- * @param argv array of input arguments
- * @param self this object
- * @return self
- * @see Info_aref
- * @see Info_define
- * @see Info_undefine
+ * @overload []=(format, key)
+ *   @param format [String] An image format name such as "ps" or "tiff".
+ *   @param key [String] A string that identifies the option.
+ *
+ * @overload []=(key)
+ *   @param key [String] A string that identifies the option.
+ *
+ * @return [Magick::Image::Info] self
+ * @see #[]
+ * @see #define
+ * @see #undefine
  */
 VALUE
 Info_aset(int argc, VALUE *argv, VALUE self)
@@ -338,8 +310,6 @@ Info_aset(int argc, VALUE *argv, VALUE self)
     char *format_p, *key_p, *value_p = NULL;
     long format_l, key_l;
     char ckey[MaxTextExtent];
-    unsigned int okay;
-
 
     Data_Get_Struct(self, Info, info);
 
@@ -354,14 +324,13 @@ Info_aset(int argc, VALUE *argv, VALUE self)
                 rb_raise(rb_eArgError, "%.60s:%.1024s not defined - too long", format_p, key_p);
             }
 
-            (void) snprintf(ckey, sizeof(ckey), "%.60s:%.*s", format_p, (int)(sizeof(ckey)-MAX_FORMAT_LEN), key_p);
+            snprintf(ckey, sizeof(ckey), "%.60s:%.*s", format_p, (int)(sizeof(ckey)-MAX_FORMAT_LEN), key_p);
 
             value = argv[2];
             break;
 
         case 2:
-            strncpy(ckey, StringValuePtr(argv[0]), sizeof(ckey)-1);
-            ckey[sizeof(ckey)-1] = '\0';
+            strlcpy(ckey, StringValueCStr(argv[0]), sizeof(ckey));
 
             value = argv[1];
             break;
@@ -373,13 +342,15 @@ Info_aset(int argc, VALUE *argv, VALUE self)
 
     if (NIL_P(value))
     {
-        (void) DeleteImageOption(info, ckey);
+        DeleteImageOption(info, ckey);
     }
     else
     {
+        unsigned int okay;
+
         /* Allow any argument that supports to_s */
-        value = rm_to_s(value);
-        value_p = StringValuePtr(value);
+        value = rb_String(value);
+        value_p = StringValueCStr(value);
 
         okay = SetImageOption(info, ckey, value_p);
         if (!okay)
@@ -396,13 +367,9 @@ Info_aset(int argc, VALUE *argv, VALUE self)
 
 
 /**
- * Get the attenuate attribute.
+ * Get the attenuate value.
  *
- * Ruby usage:
- *   - @verbatim Info#attenuate @endverbatim
- *
- * @param self this object
- * @return the attenuate
+ * @return [Float] the attenuate
  */
 VALUE
 Info_attenuate(VALUE self)
@@ -412,14 +379,10 @@ Info_attenuate(VALUE self)
 
 
 /**
- * Set the attenuate attribute.
+ * Set the attenuate value.
  *
- * Ruby usage:
- *   - @verbatim Info#attenuate= @endverbatim
- *
- * @param self this object
- * @param value the attenuate
- * @return self
+ * @param value [Float] the attenuate
+ * @return [Float] the attenuate
  */
 VALUE
 Info_attenuate_eq(VALUE self, VALUE value)
@@ -429,13 +392,9 @@ Info_attenuate_eq(VALUE self, VALUE value)
 
 
 /**
- * Get the authenticate attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#authenticate @endverbatim
+ * Get the authenticate value.
  *
- * @param self this object
- * @return the authenticate
+ * @return [String] the authenticate
  */
 VALUE
 Info_authenticate(VALUE self)
@@ -443,19 +402,19 @@ Info_authenticate(VALUE self)
     Info *info;
 
     Data_Get_Struct(self, Info, info);
+#if defined(IMAGEMAGICK_7)
+    return C_str_to_R_str(GetImageOption(info, "authenticate"));
+#else
     return C_str_to_R_str(info->authenticate);
+#endif
 }
 
 
 /**
- * Set the authenticate attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#authenticate= @endverbatim
+ * Set the authenticate value.
  *
- * @param self this object
- * @param passwd_arg the authenticating password
- * @return passwd_arg
+ * @param passwd_arg [String] the authenticating password
+ * @return [String] the given value
  */
 VALUE
 Info_authenticate_eq(VALUE self, VALUE passwd_arg)
@@ -467,9 +426,19 @@ Info_authenticate_eq(VALUE self, VALUE passwd_arg)
 
     if (!NIL_P(passwd_arg))
     {
-        passwd = StringValuePtr(passwd_arg);
+        passwd = StringValueCStr(passwd_arg);
     }
 
+#if defined(IMAGEMAGICK_7)
+    if (passwd)
+    {
+        SetImageOption(info, "authenticate", passwd);
+    }
+    else
+    {
+        RemoveImageOption(info, "authenticate");
+    }
+#else
     if (info->authenticate)
     {
         magick_free(info->authenticate);
@@ -479,6 +448,7 @@ Info_authenticate_eq(VALUE self, VALUE passwd_arg)
     {
         magick_clone_string(&info->authenticate, passwd);
     }
+#endif
 
     return passwd_arg;
 }
@@ -487,12 +457,8 @@ Info_authenticate_eq(VALUE self, VALUE passwd_arg)
 /**
  * Return the name of the background color as a String
  *
- * Ruby usage:
- *   - @verbatim Info#background_color @endverbatim
- *
- * @param self this object
- * @return the name of the background color
- * @see Image_background_color
+ * @return [String] the name of the background color
+ * @see Image#background_color
  */
 VALUE
 Info_background_color(VALUE self)
@@ -507,38 +473,25 @@ Info_background_color(VALUE self)
 /**
  * Set the background color.
  *
- * Ruby usage:
- *   - @verbatim Info#background_color= @endverbatim
- *
- * Notes:
- *   - Color should be a string
- *
- * @param self this object
- * @param bc_arg the background color
- * @return bc_arg
- * @throw ArgumentError
+ * @param bc_arg [Magick::Pixel, String] the background color
+ * @return [Magick::Pixel, String] the given color
  */
 VALUE
 Info_background_color_eq(VALUE self, VALUE bc_arg)
 {
     Info *info;
-    //char colorname[MaxTextExtent];
 
     Data_Get_Struct(self, Info, info);
     Color_to_PixelColor(&info->background_color, bc_arg);
-    //SetImageOption(info, "background", pixel_packet_to_hexname(&info->background_color, colorname));
+
     return bc_arg;
 }
 
 /**
  * Return the name of the border color as a String.
  *
- * Ruby usage:
- *   - @verbatim Info#border_color @endverbatim
- *
- * @param self this object
- * @return the border color
- * @see Image_border_color
+ * @return [String] the border color name
+ * @see Image#border_color
  */
 VALUE
 Info_border_color(VALUE self)
@@ -552,39 +505,26 @@ Info_border_color(VALUE self)
 /**
  * set the border color
  *
- * Ruby usage:
- *   - @verbatim Info#border_color= @endverbatim
- *
- * Notes:
- *   - Color should be a string
- *
- * @param self this object
- * @param bc_arg the border color
- * @return bc_arg
- * @throw ArgumentError
+ * @param bc_arg [Magick::Pixel, String] the border color
+ * @return [Magick::Pixel, String] the given color
  */
 VALUE
 Info_border_color_eq(VALUE self, VALUE bc_arg)
 {
     Info *info;
-    //char colorname[MaxTextExtent];
 
     Data_Get_Struct(self, Info, info);
     Color_to_PixelColor(&info->border_color, bc_arg);
-    //SetImageOption(info, "bordercolor", pixel_packet_to_hexname(&info->border_color, colorname));
+
     return bc_arg;
 }
 
 
 
 /**
- * Emulate the -caption option.
+ * Get a caption of image
  *
- * Ruby usage:
- *   - @verbatim Info#caption @endverbatim
- *
- * @param self this object
- * @return the caption
+ * @return [String] the caption
  */
 VALUE
 Info_caption(VALUE self)
@@ -595,14 +535,10 @@ Info_caption(VALUE self)
 
 
 /**
- * Emulate the -caption option.
- *
- * Ruby usage:
- *   - @verbatim Info#caption= @endverbatim
+ * Assigns a caption to an image.
  *
- * @param self this object
- * @param caption the caption
- * @return self
+ * @param caption [String] the caption
+ * @return [String] the given value
  */
 VALUE
 Info_caption_eq(VALUE self, VALUE caption)
@@ -614,19 +550,13 @@ Info_caption_eq(VALUE self, VALUE caption)
 /**
  * Set the channels
  *
- * Ruby usage:
- *   - @verbatim Info#channel @endverbatim
- *   - @verbatim Info#channel(channel) @endverbatim
- *   - @verbatim Info#channel(channel, ...) @endverbatim
+ * @overload channel(channel = Magick::AllChannels)
+ *   @param channel [Magick::ChannelType] the channel
  *
- * Notes:
- *   - Default channel is AllChannels
- *   - Thanks to Douglas Sellers.
+ * @overload channel(*channels)
+ *   @param channels [Magick::ChannelType] the multiple arguments of channel
  *
- * @param argc number of input arguments
- * @param argv array of input arguments
- * @param self this object
- * @return self
+ * @return [Magick::Image::Info] self
  */
 VALUE
 Info_channel(int argc, VALUE *argv, VALUE self)
@@ -652,11 +582,7 @@ Info_channel(int argc, VALUE *argv, VALUE self)
 /**
  * Get the colorspace type.
  *
- * Ruby usage:
- *   - @verbatim Info#colorspace @endverbatim
- *
- * @param self this object
- * @return the colorspace type
+ * @return [Magick::ColorspaceType] the colorspace type
  */
 VALUE
 Info_colorspace(VALUE self)
@@ -670,13 +596,8 @@ Info_colorspace(VALUE self)
 /**
  * Set the colorspace type
  *
- * Ruby usage:
- *   - @verbatim Info#colorspace= @endverbatim
- *
- * @param self this object
- * @param colorspace the colorspace type
- * @return colorspace
- * @throw ArgumentError
+ * @param colorspace [Magick::ColorspaceType] the colorspace type
+ * @return [Magick::ColorspaceType] the given colorspace
  */
 VALUE
 Info_colorspace_eq(VALUE self, VALUE colorspace)
@@ -688,16 +609,31 @@ Info_colorspace_eq(VALUE self, VALUE colorspace)
     return colorspace;
 }
 
-OPTION_ATTR_ACCESSOR(comment, Comment)
+/**
+ * Get the comment.
+ *
+ * @return [String] the comment
+ */
+VALUE Info_comment(VALUE self)
+{
+    return get_option(self, "Comment");
+}
+
+/**
+ * Set the comment
+ *
+ * @param string [String] the comment
+ * @return [String] the given comment
+ */
+VALUE Info_comment_eq(VALUE self, VALUE string)
+{
+    return set_option(self, "Comment", string);
+}
 
 /**
  * Get the compression type.
  *
- * Ruby usage:
- *   - @verbatim Info#compression @endverbatim
- *
- * @param self this object
- * @return the compression type
+ * @return [Magick::CompressionType] the compression type
  */
 VALUE
 Info_compression(VALUE self)
@@ -711,13 +647,8 @@ Info_compression(VALUE self)
 /**
  * Set the compression type
  *
- * Ruby usage:
- *   - @verbatim Info#compression= @endverbatim
- *
- * @param self this object
- * @param type the compression type
- * @return type
- * @throw ArgumentError
+ * @param type [Magick::CompressionType] the compression type
+ * @return [Magick::CompressionType] the given type
  */
 VALUE
 Info_compression_eq(VALUE self, VALUE type)
@@ -730,20 +661,14 @@ Info_compression_eq(VALUE self, VALUE type)
 }
 
 /**
- * Call SetImageOption
+ * Define an option.
  *
- * Ruby usage:
- *   - @verbatim Info#define(format, key) @endverbatim
- *   - @verbatim Info#define(format, key, value) @endverbatim
+ * @overload Info#define(format, key, value = "")
+ *   @param format [String] An image format name such as "ps" or "tiff".
+ *   @param key [String] A string that identifies the option.
+ *   @param value [String] A value of option
  *
- * Notes:
- *   - Default value is the empty string
- *   - This is the only method in Info that is not an attribute accessor.
- *
- * @param argc number of input arguments
- * @param argv array of input arguments
- * @param self this object
- * @return self
+ * @return [Magick::Image::Info] self
  */
 VALUE
 Info_define(int argc, VALUE *argv, VALUE self)
@@ -763,7 +688,7 @@ Info_define(int argc, VALUE *argv, VALUE self)
         case 3:
             /* Allow any argument that supports to_s */
             fmt_arg = rb_String(argv[2]);
-            value = (const char *)StringValuePtr(fmt_arg);
+            value = (const char *)StringValueCStr(fmt_arg);
         case 2:
             key = rm_str2cstr(argv[1], &key_l);
             format = rm_str2cstr(argv[0], &format_l);
@@ -776,9 +701,9 @@ Info_define(int argc, VALUE *argv, VALUE self)
     {
         rb_raise(rb_eArgError, "%.20s:%.20s not defined - format or key too long", format, key);
     }
-    (void) sprintf(ckey, "%s:%s", format, key);
+    snprintf(ckey, sizeof(ckey), "%s:%s", format, key);
 
-    (void) DeleteImageOption(info, ckey);
+    DeleteImageOption(info, ckey);
     okay = SetImageOption(info, ckey, value);
     if (!okay)
     {
@@ -792,16 +717,9 @@ Info_define(int argc, VALUE *argv, VALUE self)
 }
 
 /**
- * Get the delay attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#delay @endverbatim
- *
- * Notes:
- *   - Convert from string to numeric
+ * Get the delay value.
  *
- * @param self this object
- * @return the delay
+ * @return [Numeric, nil] the delay
  */
 VALUE
 Info_delay(VALUE self)
@@ -809,13 +727,14 @@ Info_delay(VALUE self)
     Info *info;
     const char *delay;
     char *p;
-    long d;
 
     Data_Get_Struct(self, Info, info);
 
     delay = GetImageOption(info, "delay");
     if (delay)
     {
+        long d;
+
         d = strtol(delay, &p, 10);
         if (*p != '\0')
         {
@@ -841,71 +760,58 @@ arg_is_integer(VALUE arg)
 }
 
 /**
- * Set the delay attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#delay= @endverbatim
+ * Set the delay value.
  *
- * Notes:
- *   - Convert from numeric value to string.
- *
- * @param self this object
- * @param string the delay
- * @return string
+ * @param string [String] the delay
+ * @return [String] the given value
  */
 VALUE
 Info_delay_eq(VALUE self, VALUE string)
 {
     Info *info;
-    int delay;
     int not_num;
-    char dstr[20];
 
     Data_Get_Struct(self, Info, info);
 
     if (NIL_P(string))
     {
-        (void) DeleteImageOption(info, "delay");
+        DeleteImageOption(info, "delay");
     }
     else
     {
+        char dstr[20];
+        int delay;
+
         not_num = 0;
-        (void) rb_protect(arg_is_integer, string, &not_num);
+        rb_protect(arg_is_integer, string, &not_num);
         if (not_num)
         {
             rb_raise(rb_eTypeError, "failed to convert %s into Integer", rb_class2name(CLASS_OF(string)));
         }
         delay = NUM2INT(string);
-        sprintf(dstr, "%d", delay);
-        (void) SetImageOption(info, "delay", dstr);
+        snprintf(dstr, sizeof(dstr), "%d", delay);
+        SetImageOption(info, "delay", dstr);
     }
     return string;
 }
 
 /**
- * Get the density attribute
- *
- * Ruby usage:
- *   - @verbatim Info#density @endverbatim
+ * Get the density value
  *
- * @param self this object
- * @return the density
+ * @return [String] the density
  */
-DEF_ATTR_READER(Info, density, str)
+VALUE
+Info_density(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, density, str);
+}
 
 /**
- * Set the text rendering density
- *
- * Ruby usage:
- *   - @verbatim Info#density= @endverbatim
- *
- * Notes:
- *   - density should be a string, e.g., "72x72"
+ * Set the text rendering density geometry
  *
- * @param self this object
- * @param density_arg the density
- * @return density_arg
- * @throw ArgumentError
+ * @param density_arg [String] the density
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_density_eq(VALUE self, VALUE density_arg)
@@ -923,8 +829,8 @@ Info_density_eq(VALUE self, VALUE density_arg)
         return self;
     }
 
-    density = rm_to_s(density_arg);
-    dens = StringValuePtr(density);
+    density = rb_String(density_arg);
+    dens = StringValueCStr(density);
     if (!IsGeometry(dens))
     {
         rb_raise(rb_eArgError, "invalid density geometry: %s", dens);
@@ -938,26 +844,21 @@ Info_density_eq(VALUE self, VALUE density_arg)
 }
 
 /**
- * Get the depth attribute
- *
- * Ruby usage:
- *   - @verbatim Info#depth @endverbatim
+ * Get the depth value
  *
- * @param self this object
- * @return the depth
+ * @return [Numeric] the depth
  */
-DEF_ATTR_READER(Info, depth, int)
+VALUE
+Info_depth(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, depth, int);
+}
 
 /**
- * Set the depth (8, 16, 32).
- *
- * Ruby usage:
- *   - @verbatim Info#depth= @endverbatim
+ * Set the depth (8, 16, 32, 64).
  *
- * @param self this object
- * @param depth the depth
- * @return depth
- * @throw ArgumentError
+ * @param depth [Numeric] the depth
+ * @return [Numeric] the given depth
  */
 VALUE
 Info_depth_eq(VALUE self, VALUE depth)
@@ -1040,17 +941,12 @@ DisposeType rm_dispose_to_enum(const char *name)
  * Retrieve the dispose option string and convert it to a DisposeType
  * enumerator.
  *
- * Ruby usage:
- *   - @verbatim Info#dispose @endverbatim
- *
- * @param self this object
- * @return a DisposeType enumerator
+ * @return [Magick::DisposeType] a DisposeType enumerator
  */
 VALUE
 Info_dispose(VALUE self)
 {
     Info *info;
-    int x;
     ID dispose_id;
     const char *dispose;
 
@@ -1059,10 +955,10 @@ Info_dispose(VALUE self)
     dispose_id = rb_intern("UndefinedDispose");
 
     // Map the dispose option string to a DisposeType enumerator.
-    dispose=GetImageOption(info, "dispose");
+    dispose = GetImageOption(info, "dispose");
     if (dispose)
     {
-        for (x = 0; x < N_DISPOSE_OPTIONS; x++)
+        for (int x = 0; x < N_DISPOSE_OPTIONS; x++)
         {
             if (strcmp(dispose, Dispose_Option[x].string) == 0)
             {
@@ -1078,12 +974,8 @@ Info_dispose(VALUE self)
 /**
  * Convert a DisposeType enumerator into the equivalent dispose option string.
  *
- * Ruby usage:
- *   - @verbatim Info#dispose= @endverbatim
- *
- * @param self this object
- * @param disp the DisposeType enumerator
- * @return disp
+ * @param disp [Magic::DisposeType] the DisposeType enumerator
+ * @return [Magic::DisposeType] the given value
  */
 VALUE
 Info_dispose_eq(VALUE self, VALUE disp)
@@ -1097,7 +989,7 @@ Info_dispose_eq(VALUE self, VALUE disp)
 
     if (NIL_P(disp))
     {
-        (void) DeleteImageOption(info, "dispose");
+        DeleteImageOption(info, "dispose");
         return self;
     }
 
@@ -1113,21 +1005,38 @@ Info_dispose_eq(VALUE self, VALUE disp)
         }
     }
 
-    (void) SetImageOption(info, "dispose", option);
+    SetImageOption(info, "dispose", option);
     return disp;
 }
 
-DEF_ATTR_ACCESSOR(Info, dither, bool)
-
+/**
+ * Get dither value
+ *
+ * @return [Boolean] true if dither is enabled
+ */
+VALUE
+Info_dither(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, dither, boolean);
+}
 
 /**
- * Get the endian attribute.
+ * Set dither value
  *
- * Ruby usage:
- *   - @verbatim Info#endian @endverbatim
+ * @param val [Boolean] true if dither will be enabled
+ * @return [Boolean] true if dither is enabled
+ */
+VALUE
+Info_dither_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, dither, boolean);
+}
+
+
+/**
+ * Get the endian value.
  *
- * @param self this object
- * @return the endian (Magick::MSBEndian or Magick::LSBEndian)
+ * @return [Magick::EndianType] the endian
  */
 VALUE
 Info_endian(VALUE self)
@@ -1140,14 +1049,10 @@ Info_endian(VALUE self)
 
 
 /**
- * Set the endian attribute.
+ * Set the endian value.
  *
- * Ruby usage:
- *   - @verbatim Info#endian= @endverbatim
- *
- * @param self this object
- * @param endian the endian (Magick::MSBEndian or Magick::LSBEndian)
- * @return endian
+ * @param endian [Magick::EndianType] the endian
+ * @return [Magick::EndianType] the given endian
  */
 VALUE
 Info_endian_eq(VALUE self, VALUE endian)
@@ -1167,32 +1072,23 @@ Info_endian_eq(VALUE self, VALUE endian)
 
 
 /**
- * Get the extract string, e.g. "200x200+100+100"
+ * Get the extract geometry, e.g. "200x200+100+100"
  *
- * Ruby usage:
- *   - @verbatim Info#extract @endverbatim
- *
- * Notes:
- *   - Defined for ImageMagick 5.5.6 and later
- *
- * @param self this object
- * @return the extract string
+ * @return [String] the extract string
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
-DEF_ATTR_READER(Info, extract, str)
+VALUE
+Info_extract(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, extract, str);
+}
 
 /**
- * Set the extract string, e.g. "200x200+100+100"
+ * Set the extract geometry.
  *
- * Ruby usage:
- *   - @verbatim Info#extract= @endverbatim
- *
- * Notes:
- *   - Defined for ImageMagick 5.5.6 and later
- *
- * @param self this object
- * @param extract_arg the extract string
- * @return extract_arg
- * @throw ArgumentError
+ * @param extract_arg [String] the extract string
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_extract_eq(VALUE self, VALUE extract_arg)
@@ -1210,8 +1106,8 @@ Info_extract_eq(VALUE self, VALUE extract_arg)
         return self;
     }
 
-    extract = rm_to_s(extract_arg);
-    extr = StringValuePtr(extract);
+    extract = rb_String(extract_arg);
+    extr = StringValueCStr(extract);
     if (!IsGeometry(extr))
     {
         rb_raise(rb_eArgError, "invalid extract geometry: %s", extr);
@@ -1226,17 +1122,11 @@ Info_extract_eq(VALUE self, VALUE extract_arg)
 
 
 /**
- * Get the "filename".
- *
- * Ruby usage:
- *   - @verbatim Info#filename @endverbatim
+ * Get the "filename" value.
  *
- * Notes:
- *   - Only used for Image_capture
- *
- * @param self this object
- * @return the filename ("" if filename not set)
- * @see Image_capture
+ * @return [String] the file name ("" if filename not set)
+ * @note Only used for Image#capture
+ * @see Image#capture
  */
 VALUE
 Info_filename(VALUE self)
@@ -1248,37 +1138,32 @@ Info_filename(VALUE self)
 }
 
 /**
- * Set the "filename".
- *
- * Ruby usage:
- *   - @verbatim Info#filename= @endverbatim
- *
- * Notes:
- *   - Only used for Image_capture
+ * Set the "filename" value.
  *
- * @param self this object
- * @param filename the filename
- * @return filename
- * @see Image_capture
+ * @param filename [String] the file name
+ * @return [String] the given file name
+ * @note Only used for Image#capture
+ * @see Image#capture
  */
 VALUE
 Info_filename_eq(VALUE self, VALUE filename)
 {
     Info *info;
-    char *fname;
 
     Data_Get_Struct(self, Info, info);
 
     // Allow "nil" - remove current filename
-    if (NIL_P(filename) || StringValuePtr(filename) == NULL)
+    if (NIL_P(filename) || StringValueCStr(filename) == NULL)
     {
         info->filename[0] = '\0';
     }
     else
     {
+        char *fname;
+
         // Otherwise copy in filename
-        fname = StringValuePtr(filename);
-        strncpy(info->filename, fname, MaxTextExtent);
+        fname = StringValueCStr(filename);
+        strlcpy(info->filename, fname, sizeof(info->filename));
     }
     return filename;
 }
@@ -1287,11 +1172,7 @@ Info_filename_eq(VALUE self, VALUE filename)
 /**
  * Return the fill color as a String.
  *
- * Ruby usage:
- *   - @verbatim Info#fill @endverbatim
- *
- * @param self this object
- * @return the fill color
+ * @return [String] the fill color
  */
 VALUE
 Info_fill(VALUE self)
@@ -1302,13 +1183,8 @@ Info_fill(VALUE self)
 /**
  * Set the fill color
  *
- * Ruby usage:
- *   - @verbatim Info#fill= @endverbatim
- *
- * @param self this object
- * @param color the fill color (as a String)
- * @return self
- * @throw ArgumentError
+ * @param color [String] the fill color
+ * @return [String] the given value
  */
 VALUE
 Info_fill_eq(VALUE self, VALUE color)
@@ -1320,39 +1196,36 @@ Info_fill_eq(VALUE self, VALUE color)
 /**
  * Get the text font.
  *
- * Ruby usage:
- *   - @verbatim Info#font @endverbatim
- *
- * @param self this object
- * @return the font
+ * @return [String] the font
  */
-DEF_ATTR_READER(Info, font, str)
+VALUE
+Info_font(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, font, str);
+}
 
 /**
  * Set the text font.
  *
- * Ruby usage:
- *   - @verbatim Info#font= @endverbatim
- *
- * @param self this object
- * @param font_arg the font (as a String)
- * @return font_arg
+ * @param font_arg [String] the font
+ * @return [String] the given font
  */
 VALUE
 Info_font_eq(VALUE self, VALUE font_arg)
 {
     Info *info;
-    char *font;
 
     Data_Get_Struct(self, Info, info);
-    if (NIL_P(font_arg) || StringValuePtr(font_arg) == NULL)
+    if (NIL_P(font_arg) || StringValueCStr(font_arg) == NULL)
     {
         magick_free(info->font);
         info->font = NULL;
     }
     else
     {
-        font = StringValuePtr(font_arg);
+        char *font;
+
+        font = StringValueCStr(font_arg);
         magick_clone_string(&info->font, font);
     }
     return font_arg;
@@ -1361,24 +1234,21 @@ Info_font_eq(VALUE self, VALUE font_arg)
 /**
  * Return the image encoding format.
  *
- * Ruby usage:
- *   - @verbatim Info#format @endverbatim
- *
- * @param self this object
- * @return the encoding format
+ * @return [String, nil] the encoding format
  */
 VALUE Info_format(VALUE self)
 {
     Info *info;
-    const MagickInfo *magick_info ;
-    ExceptionInfo *exception;
 
     Data_Get_Struct(self, Info, info);
     if (*info->magick)
     {
+        const MagickInfo *magick_info;
+        ExceptionInfo *exception;
+
         exception = AcquireExceptionInfo();
         magick_info = GetMagickInfo(info->magick, exception);
-        (void) DestroyExceptionInfo(exception);
+        DestroyExceptionInfo(exception);
 
         return magick_info ? rb_str_new2(magick_info->name) : Qnil;
     }
@@ -1389,12 +1259,8 @@ VALUE Info_format(VALUE self)
 /**
  * Set the image encoding format.
  *
- * Ruby usage:
- *   - @verbatim Info#format= @endverbatim
- *
- * @param self this object
- * @param magick the encoding format
- * @return magick
+ * @param magick [String] the encoding format
+ * @return [String] the given format
  */
 VALUE
 Info_format_eq(VALUE self, VALUE magick)
@@ -1406,47 +1272,44 @@ Info_format_eq(VALUE self, VALUE magick)
 
     Data_Get_Struct(self, Info, info);
 
-    mgk = StringValuePtr(magick);
+    mgk = StringValueCStr(magick);
 
     exception = AcquireExceptionInfo();
     m = GetMagickInfo(mgk, exception);
-    CHECK_EXCEPTION()
-    (void) DestroyExceptionInfo(exception);
+    CHECK_EXCEPTION();
+    DestroyExceptionInfo(exception);
 
     if (!m)
     {
         rb_raise(rb_eArgError, "unknown format: %s", mgk);
     }
 
-    strncpy(info->magick, m->name, MaxTextExtent-1);
+    strlcpy(info->magick, m->name, sizeof(info->magick));
     return magick;
 }
 
 /**
  * Get the fuzz.
  *
- * Ruby usage:
- *   - @verbatim Info#fuzz @endverbatim
- *
- * @param self this object
- * @return the fuzz
- * @see Image_fuzz
+ * @return [Float] the fuzz
+ * @see Image#fuzz
  */
-DEF_ATTR_READER(Info, fuzz, dbl)
+VALUE
+Info_fuzz(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, fuzz, dbl);
+}
 
 /**
  * Set the fuzz.
  *
- * Ruby usage:
- *   - @verbatim Info#fuzz=number @endverbatim
- *   - @verbatim Info#fuzz=NN% @endverbatim
- *
- * @param self this object
- * @param fuzz the fuzz
- * @return fuzz
- * @see Image_fuzz_eq
+ * @param fuzz [Float, String] the fuzz with Float or
+ *   percent format "xx%" with String
+ * @return [Float, String] the given value
+ * @see Image#fuzz=
  */
-VALUE Info_fuzz_eq(VALUE self, VALUE fuzz)
+VALUE
+Info_fuzz_eq(VALUE self, VALUE fuzz)
 {
     Info *info;
 
@@ -1473,8 +1336,7 @@ static struct
     { "SouthEast",  "SouthEastGravity", SouthEastGravity},
     { "South",      "SouthGravity",     SouthGravity},
     { "SouthWest",  "SouthWestGravity", SouthWestGravity},
-    { "West",       "WestGravity",      WestGravity},
-    { "Static",     "StaticGravity",    StaticGravity}
+    { "West",       "WestGravity",      WestGravity}
 };
 
 /** Number of gravity options */
@@ -1510,17 +1372,12 @@ GravityType rm_gravity_to_enum(const char *name)
 /**
  * Return the value of the gravity option as a GravityType enumerator.
  *
- * Ruby usage:
- *   - @verbatim Info#gravity @endverbatim
- *
- * @param self this object
- * @return the gravity enumerator
+ * @return [Magick::GravityType] the gravity enumerator
  */
 VALUE Info_gravity(VALUE self)
 {
     Info *info;
     const char *gravity;
-    int x;
     ID gravity_id;
 
     Data_Get_Struct(self, Info, info);
@@ -1528,10 +1385,10 @@ VALUE Info_gravity(VALUE self)
     gravity_id = rb_intern("UndefinedGravity");
 
     // Map the gravity option string to a GravityType enumerator.
-    gravity=GetImageOption(info, "gravity");
+    gravity = GetImageOption(info, "gravity");
     if (gravity)
     {
-        for (x = 0; x < N_GRAVITY_OPTIONS; x++)
+        for (int x = 0; x < N_GRAVITY_OPTIONS; x++)
         {
             if (strcmp(gravity, Gravity_Option[x].string) == 0)
             {
@@ -1548,12 +1405,8 @@ VALUE Info_gravity(VALUE self)
  * Convert a GravityType enum to a gravity option name and store in the Info
  * structure.
  *
- * Ruby usage:
- *   - @verbatim Info#gravity= @endverbatim
- *
- * @param self this object
- * @param grav the gravity enumerator
- * @return grav
+ * @param grav [Magick::GravityType] the gravity enumerator
+ * @return [Magick::GravityType] the given gravity
  */
 VALUE
 Info_gravity_eq(VALUE self, VALUE grav)
@@ -1567,7 +1420,7 @@ Info_gravity_eq(VALUE self, VALUE grav)
 
     if (NIL_P(grav))
     {
-        (void) DeleteImageOption(info, "gravity");
+        DeleteImageOption(info, "gravity");
         return self;
     }
 
@@ -1583,66 +1436,15 @@ Info_gravity_eq(VALUE self, VALUE grav)
         }
     }
 
-    (void) SetImageOption(info, "gravity", option);
+    SetImageOption(info, "gravity", option);
     return grav;
 }
 
 
-/**
- * Get the group attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#group @endverbatim
- *
- * @param self this object
- * @return the group
- * @deprecated This method has been deprecated.
- */
-VALUE
-Info_group(VALUE self)
-{
-    Info *info;
-
-    rb_warning("Info#group is deprecated");
-    (void) rm_check_destroyed(self);
-    Data_Get_Struct(self, Info, info);
-    return C_long_to_R_long(info->group);
-}
-
-
-/**
- * Set the group attribute.
- *
- * Ruby usage:
- *   - @verbatim Info#group= @endverbatim
- *
- * @param self this object
- * @param value the group
- * @return value
- * @deprecated This method has been deprecated.
- */
-VALUE
-Info_group_eq(VALUE self, VALUE value)
-{
-    Info *info;
-
-    rb_warning("Info#group= is deprecated");
-    (void) rm_check_destroyed(self);
-    rb_check_frozen(self);
-    Data_Get_Struct(self, Info, info);
-    info->group = R_long_to_C_long(value);
-    return value;
-}
-
-
 /**
  * Get the classification type.
  *
- * Ruby usage:
- *   - @verbatim Info#image_type @endverbatim
- *
- * @param self this object
- * @return the classification type
+ * @return [Magick::ImageType] the classification type
  */
 VALUE
 Info_image_type(VALUE self)
@@ -1656,13 +1458,8 @@ Info_image_type(VALUE self)
 /**
  * Set the classification type.
  *
- * Ruby usage:
- *   - @verbatim Info#image_type= @endverbatim
- *
- * @param self this object
- * @param type the classification type
- * @return type
- * @throw ArgumentError
+ * @param type [Magick::ImageType] the classification type
+ * @return [Magick::ImageType] the given type
  */
 VALUE
 Info_image_type_eq(VALUE self, VALUE type)
@@ -1677,11 +1474,7 @@ Info_image_type_eq(VALUE self, VALUE type)
 /**
  * Get the interlace type.
  *
- * Ruby usage:
- *   - @verbatim Info#interlace @endverbatim
- *
- * @param self this object
- * @return the interlace type
+ * @return [Magick::InterlaceType] the interlace type
  */
 VALUE
 Info_interlace(VALUE self)
@@ -1695,13 +1488,8 @@ Info_interlace(VALUE self)
 /**
  * Set the interlace type
  *
- * Ruby usage:
- *   - @verbatim Info#interlace= @endverbatim
- *
- * @param self this object
- * @param inter the interlace type
- * @return inter
- * @throw ArgumentError
+ * @param inter [Magick::InterlaceType] the interlace type
+ * @return [Magick::InterlaceType] the given interlace
  */
 VALUE
 Info_interlace_eq(VALUE self, VALUE inter)
@@ -1713,17 +1501,32 @@ Info_interlace_eq(VALUE self, VALUE inter)
     return inter;
 }
 
-OPTION_ATTR_ACCESSOR(label, Label)
+/**
+ * Get the label.
+ *
+ * @return [String] the label
+ */
+VALUE Info_label(VALUE self)
+{
+    return get_option(self, "Label");
+}
+
+/**
+ * Set the label.
+ *
+ * @param string [String] the label
+ * @return [String] the given label
+ */
+VALUE Info_label_eq(VALUE self, VALUE string)
+{
+    return set_option(self, "Label", string);
+}
 
 /**
  * Return the name of the matte color as a String.
  *
- * Ruby usage:
- *   - @verbatim Info#matte_color @endverbatim
- *
- * @param self this object
- * @return the name of the matte color
- * @see Image_matte_color
+ * @return [String] the name of the matte color
+ * @see Image#matte_color
  */
 VALUE
 Info_matte_color(VALUE self)
@@ -1737,36 +1540,27 @@ Info_matte_color(VALUE self)
 /**
  * Set the matte color.
  *
- * Ruby usage:
- *   - @verbatim Info#matte_color= @endverbatim
- *
- * @param self this object
- * @param matte_arg the name of the matte as a String
- * @return matte_arg
- * @throw ArgumentError
+ * @param matte_arg [Magick::Pixel, String] the name of the matte as a String
+ * @return [Magick::Pixel, String] the given value
  */
 VALUE
 Info_matte_color_eq(VALUE self, VALUE matte_arg)
 {
     Info *info;
-    //char colorname[MaxTextExtent];
 
     Data_Get_Struct(self, Info, info);
     Color_to_PixelColor(&info->matte_color, matte_arg);
-    //SetImageOption(info, "mattecolor", pixel_packet_to_hexname(&info->matte_color, colorname));
+
     return matte_arg;
 }
 
 /**
  * Establish a progress monitor.
  *
- * Ruby usage:
- *   - @verbatim Info#monitor= @endverbatim
- *
- * @param self this object
- * @param monitor the monitor
- * @return monitor
- * @see Image_monitor_eq
+ * @param monitor [Proc] the monitor
+ * @return [Proc] monitor
+ * @see Image#monitor=
+ * @deprecated Magick::Image::Info#monitor= is deprecated. This method will be removed in RMagick 5.0.
  */
 VALUE
 Info_monitor_eq(VALUE self, VALUE monitor)
@@ -1775,33 +1569,70 @@ Info_monitor_eq(VALUE self, VALUE monitor)
 
     Data_Get_Struct(self, Info, info);
 
+    rb_warning("Magick::Image::Info#monitor= is deprecated. This method will be removed in RMagick 5.0.");
+
     if (NIL_P(monitor))
     {
         info->progress_monitor = NULL;
     }
     else
     {
-        (void) SetImageInfoProgressMonitor(info, rm_progress_monitor, (void *)monitor);
+        SetImageInfoProgressMonitor(info, rm_progress_monitor, (void *)monitor);
     }
 
     return monitor;
 }
 
+/**
+ * Get the monochrome value.
+ *
+ * @return [Boolean] true or false
+ */
+VALUE
+Info_monochrome(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, monochrome, boolean);
+}
 
+/**
+ * Set the monochrome value.
+ *
+ * @param val [Boolean] true or false
+ * @return [Boolean] the given value
+ */
+VALUE
+Info_monochrome_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, monochrome, boolean);
+}
 
+/**
+ * Get the scene number of an image or the first image in a sequence.
+ *
+ * @return [Numeric] the scene number
+ */
+VALUE
+Info_number_scenes(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, number_scenes, ulong);
+}
 
-DEF_ATTR_ACCESSOR(Info, monochrome, bool)
-
-DEF_ATTR_ACCESSOR(Info, number_scenes, ulong)
+/**
+ * Set the scene number of an image or the first image in a sequence.
+ *
+ * @param val [Numeric] the scene number
+ * @return [Numeric] the given value
+ */
+VALUE
+Info_number_scenes_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, number_scenes, ulong);
+}
 
 /**
  * Return the orientation attribute as an OrientationType enum value.
  *
- * Ruby usage:
- *   - @verbatim Info#orientation @endverbatim
- *
- * @param self this object
- * @return the orientation
+ * @return [Magick::OrientationType] the orientation
  */
 VALUE
 Info_orientation(VALUE self)
@@ -1816,13 +1647,8 @@ Info_orientation(VALUE self)
 /**
  * Set the Orientation type.
  *
- * Ruby usage:
- *   - @verbatim Info#Orientation= @endverbatim
- *
- * @param self this object
- * @param inter the orientation type as an OrientationType enum value
- * @return inter
- * @throw ArgumentError
+ * @param inter [Magick::OrientationType] the orientation type as an OrientationType enum value
+ * @return [Magick::OrientationType] the given value
  */
 VALUE
 Info_orientation_eq(VALUE self, VALUE inter)
@@ -1838,11 +1664,8 @@ Info_orientation_eq(VALUE self, VALUE inter)
 /**
  * Return origin geometry.
  *
- * Ruby usage:
- *   - @verbatim Info#origin @endverbatim
- *
- * @param self this object
- * @return the origin geometry
+ * @return [String] the origin geometry
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_origin(VALUE self)
@@ -1861,12 +1684,12 @@ Info_origin(VALUE self)
  * Set origin geometry. Argument may be a Geometry object as well as a geometry
  * string.
  *
- * Ruby usage:
- *   - @verbatim Info#origin=+-x+-y @endverbatim
+ * The geometry format is
+ *     +-x+-y
  *
- * @param self this object
- * @param origin_arg the origin geometry
- * @return origin_arg
+ * @param origin_arg [String] the origin geometry
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_origin_eq(VALUE self, VALUE origin_arg)
@@ -1879,12 +1702,12 @@ Info_origin_eq(VALUE self, VALUE origin_arg)
 
     if (NIL_P(origin_arg))
     {
-        (void) DeleteImageOption(info, "origin");
+        DeleteImageOption(info, "origin");
         return self;
     }
 
-    origin_str = rm_to_s(origin_arg);
-    origin = GetPageGeometry(StringValuePtr(origin_str));
+    origin_str = rb_String(origin_arg);
+    origin = GetPageGeometry(StringValueCStr(origin_str));
 
     if (IsGeometry(origin) == MagickFalse)
     {
@@ -1892,7 +1715,7 @@ Info_origin_eq(VALUE self, VALUE origin_arg)
         rb_raise(rb_eArgError, "invalid origin geometry");
     }
 
-    (void) SetImageOption(info, "origin", origin);
+    SetImageOption(info, "origin", origin);
     magick_free(origin);
 
     RB_GC_GUARD(origin_str);
@@ -1904,11 +1727,7 @@ Info_origin_eq(VALUE self, VALUE origin_arg)
 /**
  * Get the Postscript page geometry.
  *
- * Ruby usage:
- *   - @verbatim Info_page @endverbatim
- *
- * @param self this object
- * @return the page geometry
+ * @return [String] the page geometry
  */
 VALUE
 Info_page(VALUE self)
@@ -1924,12 +1743,9 @@ Info_page(VALUE self)
  * Store the Postscript page geometry. Argument may be a Geometry object as well
  * as a geometry string.
  *
- * Ruby usage:
- *   - @verbatim Info#page= @endverbatim
- *
- * @param self this object
- * @param page_arg the geometry
- * @return page_arg
+ * @param page_arg [String] the geometry
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_page_eq(VALUE self, VALUE page_arg)
@@ -1945,8 +1761,8 @@ Info_page_eq(VALUE self, VALUE page_arg)
         info->page = NULL;
         return self;
     }
-    geom_str = rm_to_s(page_arg);
-    geometry=GetPageGeometry(StringValuePtr(geom_str));
+    geom_str = rb_String(page_arg);
+    geometry = GetPageGeometry(StringValueCStr(geom_str));
     if (*geometry == '\0')
     {
         magick_free(info->page);
@@ -1960,17 +1776,56 @@ Info_page_eq(VALUE self, VALUE page_arg)
     return page_arg;
 }
 
-DEF_ATTR_ACCESSOR(Info, pointsize, dbl)
-DEF_ATTR_ACCESSOR(Info, quality, ulong)
+/**
+ * Get the point size.
+ *
+ * @return [Float] the point size
+ */
+VALUE
+Info_pointsize(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, pointsize, dbl);
+}
 
 /**
- * Get sampling factors used by JPEG or MPEG-2 encoder and YUV decoder/encoder.
+ * Set the point size.
+ *
+ * @param val [Float] the point size
+ * @return [Float] the given value
+ */
+VALUE
+Info_pointsize_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, pointsize, dbl);
+}
+
+/**
+ * Get the compression level for JPEG, etc.
  *
- * Ruby usage:
- *   - @verbatim Info#sampling_factor @endverbatim
+ * @return [Numeric] the compression level
+ */
+VALUE
+Info_quality(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, quality, ulong);
+}
+
+/**
+ * Get the compression level for JPEG, etc.
  *
- * @param self this object
- * @return the sampling factors
+ * @param val [Numeric] the compression level
+ * @return [Numeric] the given value
+ */
+VALUE
+Info_quality_eq(VALUE self, VALUE val)
+{
+    IMPLEMENT_ATTR_WRITER(Info, quality, ulong);
+}
+
+/**
+ * Get sampling factors used by JPEG or MPEG-2 encoder and YUV decoder/encoder.
+ *
+ * @return [String, nil] the sampling factors
  */
 VALUE
 Info_sampling_factor(VALUE self)
@@ -1991,12 +1846,8 @@ Info_sampling_factor(VALUE self)
 /**
  * Set sampling factors used by JPEG or MPEG-2 encoder and YUV decoder/encoder.
  *
- * Ruby usage:
- *   - @verbatim Info#sampling_factor= @endverbatim
- *
- * @param self this object
- * @param sampling_factor the sampling factors
- * @return sampling_factor
+ * @param sampling_factor [String] the sampling factors
+ * @return [String] the given value
  */
 VALUE
 Info_sampling_factor_eq(VALUE self, VALUE sampling_factor)
@@ -2029,11 +1880,7 @@ Info_sampling_factor_eq(VALUE self, VALUE sampling_factor)
 /**
  * Get the scene number.
  *
- * Ruby usage:
- *   - @verbatim Info#scene @endverbatim
- *
- * @param self this object
- * @return the scene number
+ * @return [Numeric] the scene number
  */
 VALUE
 Info_scene(VALUE self)
@@ -2048,12 +1895,8 @@ Info_scene(VALUE self)
 /**
  * Set the scene number.
  *
- * Ruby usage:
- *   - @verbatim Info#scene= @endverbatim
- *
- * @param self this object
- * @param scene the scene number
- * @return scene
+ * @param scene [Numeric] the scene number
+ * @return [Numeric] the given value
  */
 VALUE
 Info_scene_eq(VALUE self, VALUE scene)
@@ -2064,8 +1907,8 @@ Info_scene_eq(VALUE self, VALUE scene)
     Data_Get_Struct(self, Info, info);
     info->scene = NUM2ULONG(scene);
 
-    (void) snprintf(buf, sizeof(buf), "%-ld", info->scene);
-    (void) SetImageOption(info, "scene", buf);
+    snprintf(buf, sizeof(buf), "%"RMIuSIZE"", info->scene);
+    SetImageOption(info, "scene", buf);
 
     return scene;
 }
@@ -2074,40 +1917,37 @@ Info_scene_eq(VALUE self, VALUE scene)
 /**
  * Get the server name.
  *
- * Ruby usage:
- *   - @verbatim Info#server_name @endverbatim
- *
- * @param self this object
- * @return the server name
+ * @return [String] the server name
  */
-DEF_ATTR_READER(Info, server_name, str)
+VALUE
+Info_server_name(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, server_name, str);
+}
 
 
 /**
  * Set the server name.
  *
- * Ruby usage:
- *   - @verbatim Info#server_name= @endverbatim
- *
- * @param self this object
- * @param server_arg the server name as a String
- * @return server_arg
+ * @param server_arg [String] the server name
+ * @return [String] the given value
  */
 VALUE
 Info_server_name_eq(VALUE self, VALUE server_arg)
 {
     Info *info;
-    char *server;
 
     Data_Get_Struct(self, Info, info);
-    if (NIL_P(server_arg) || StringValuePtr(server_arg) == NULL)
+    if (NIL_P(server_arg) || StringValueCStr(server_arg) == NULL)
     {
         magick_free(info->server_name);
         info->server_name = NULL;
     }
     else
     {
-        server = StringValuePtr(server_arg);
+        char *server;
+
+        server = StringValueCStr(server_arg);
         magick_clone_string(&info->server_name, server);
     }
     return server_arg;
@@ -2116,25 +1956,21 @@ Info_server_name_eq(VALUE self, VALUE server_arg)
 /**
  * Get ths size
  *
- * Ruby usage:
- *   - @verbatim Info#size @endverbatim
- *
- * @param self this object
- * @return the size as a Geometry object
+ * @return [String] the size as a Geometry object
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
-DEF_ATTR_READER(Info, size, str)
+VALUE
+Info_size(VALUE self)
+{
+    IMPLEMENT_ATTR_READER(Info, size, str);
+}
 
 /**
- * Set the size (either as a Geometry object or a Geometry string, i.e.
- * WxH{+-}x{+-}y)
- *
- * Ruby usage:
- *   - @verbatim Info#size= @endverbatim
+ * Set the size (either as a Geometry object or a Geometry string
  *
- * @param self this object
- * @param size_arg the size
- * @return size_arg
- * @throw ArgumentError
+ * @param size_arg [String] the size
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_size_eq(VALUE self, VALUE size_arg)
@@ -2152,8 +1988,8 @@ Info_size_eq(VALUE self, VALUE size_arg)
         return self;
     }
 
-    size = rm_to_s(size_arg);
-    sz = StringValuePtr(size);
+    size = rb_String(size_arg);
+    sz = StringValueCStr(size);
     if (!IsGeometry(sz))
     {
         rb_raise(rb_eArgError, "invalid size geometry: %s", sz);
@@ -2170,11 +2006,7 @@ Info_size_eq(VALUE self, VALUE size_arg)
 /**
  * Return the stroke color as a String.
  *
- * Ruby usage:
- *   - @verbatim Info#stroke @endverbatim
- *
- * @param self this object
- * @return the stroke color
+ * @return [String] the stroke color
  */
 VALUE
 Info_stroke(VALUE self)
@@ -2185,13 +2017,8 @@ Info_stroke(VALUE self)
 /**
  * Set the stroke color
  *
- * Ruby usage:
- *   - @verbatim Info#stroke= @endverbatim
- *
- * @param self this object
- * @param color the stroke color as a String
- * @return self
- * @throw ArgumentError
+ * @param color [String] the stroke color
+ * @return [String] the given value
  */
 VALUE
 Info_stroke_eq(VALUE self, VALUE color)
@@ -2201,16 +2028,9 @@ Info_stroke_eq(VALUE self, VALUE color)
 
 
 /**
- * Support for caption: format.
- *
- * Ruby usage:
- *   - @verbatim Info#stroke_width @endverbatim
+ * Get stroke width.
  *
- * Notes:
- *   - Supported in ImageMagick >= 6.3.2-6
- *
- * @param self this object
- * @return the stroke width
+ * @return [Float] the stroke width
  */
 VALUE
 Info_stroke_width(VALUE self)
@@ -2220,17 +2040,10 @@ Info_stroke_width(VALUE self)
 
 
 /**
- * Support for caption: format.
+ * Set stroke width.
  *
- * Ruby usage:
- *   - @verbatim Info#stroke_width= @endverbatim
- *
- * Notes:
- *   - Supported in ImageMagick >= 6.3.2-6
- *
- * @param self this object
- * @param stroke_width the stroke width
- * @return self
+ * @param stroke_width [Float] the stroke width
+ * @return [Float] the given value
  */
 VALUE
 Info_stroke_width_eq(VALUE self, VALUE stroke_width)
@@ -2242,12 +2055,8 @@ Info_stroke_width_eq(VALUE self, VALUE stroke_width)
 /**
  * Set name of texture to tile onto the image background.
  *
- * Ruby usage:
- *   - @verbatim Image::Info#texture= @endverbatim
- *
- * @param self this object
- * @param texture the name of the texture image
- * @return texture
+ * @param texture [Magick::Image] the texture image
+ * @return [Magick::Image] the given image
  */
 VALUE
 Info_texture_eq(VALUE self, VALUE texture)
@@ -2274,7 +2083,7 @@ Info_texture_eq(VALUE self, VALUE texture)
 
     // Create a temp copy of the texture and store its name in the texture field
     image = rm_check_destroyed(texture);
-    rm_write_temp_image(image, name);
+    rm_write_temp_image(image, name, sizeof(name));
 
     magick_clone_string(&info->texture, name);
 
@@ -2283,14 +2092,36 @@ Info_texture_eq(VALUE self, VALUE texture)
 
 
 /**
- * info.tile_offset = [+/-]x[+/-]y.
+ * Return tile_offset geometry.
  *
- * Ruby usage:
- *   - @verbatim Image::Info#tile_offset= @endverbatim
+ * @return [String, nil] the tile offset
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
+ */
+VALUE
+Info_tile_offset(VALUE self)
+{
+    Info *info;
+    const char *tile_offset;
+
+    Data_Get_Struct(self, Info, info);
+
+    tile_offset = GetImageOption(info, "tile-offset");
+
+    if (!tile_offset)
+    {
+        return Qnil;
+    }
+
+    return rb_str_new2(tile_offset);
+}
+
+
+/**
+ * Set tile offset geometry.
  *
- * @param self this object
- * @param offset the offset
- * @return offset
+ * @param offset [String] the offset geometry
+ * @return [String] the given value
+ * @see https://www.imagemagick.org/Magick++/Geometry.html
  */
 VALUE
 Info_tile_offset_eq(VALUE self, VALUE offset)
@@ -2299,8 +2130,8 @@ Info_tile_offset_eq(VALUE self, VALUE offset)
     VALUE offset_str;
     char *tile_offset;
 
-    offset_str = rm_to_s(offset);
-    tile_offset = StringValuePtr(offset_str);
+    offset_str = rb_String(offset);
+    tile_offset = StringValueCStr(offset_str);
     if (!IsGeometry(tile_offset))
     {
         rb_raise(rb_eArgError, "invalid tile offset geometry: %s", tile_offset);
@@ -2308,8 +2139,8 @@ Info_tile_offset_eq(VALUE self, VALUE offset)
 
     Data_Get_Struct(self, Info, info);
 
-    (void) DeleteImageOption(info, "tile-offset");
-    (void) SetImageOption(info, "tile-offset", tile_offset);
+    DeleteImageOption(info, "tile-offset");
+    SetImageOption(info, "tile-offset", tile_offset);
 
     RB_GC_GUARD(offset_str);
 
@@ -2318,14 +2149,10 @@ Info_tile_offset_eq(VALUE self, VALUE offset)
 
 
 /**
- * Return the name of the transparent color as a String.
- *
- * Ruby usage:
- *   - @verbatim Info#transparent_color @endverbatim
+ * Return the name of the transparent color.
  *
- * @param self this object
- * @return the name of the transparent color
- * @see Image_transparent_color
+ * @return [String] the name of the transparent color
+ * @see Image#transparent_color
  */
 VALUE
 Info_transparent_color(VALUE self)
@@ -2340,65 +2167,27 @@ Info_transparent_color(VALUE self)
 /**
  * Set the transparent color.
  *
- * Ruby usage:
- *   - @verbatim Info#transparent_color= @endverbatim
- *
- * @param self this object
- * @param tc_arg the transparent color as a String
- * @return tc_arg
- * @throw ArgumentError
+ * @param tc_arg [String] the transparent color
+ * @return [Magick::Pixel, String] the given value
  */
 VALUE
 Info_transparent_color_eq(VALUE self, VALUE tc_arg)
 {
     Info *info;
-    //char colorname[MaxTextExtent];
 
     Data_Get_Struct(self, Info, info);
     Color_to_PixelColor(&info->transparent_color, tc_arg);
-    //SetImageOption(info, "transparent", pixel_packet_to_hexname(&info->transparent_color, colorname));
-    return tc_arg;
-}
-
-
-/**
- * Return tile_offset attribute values.
- *
- * Ruby usage:
- *   - @verbatim Image::Info#tile_offset @endverbatim
- *
- * @param self this object
- * @return the tile offset
- */
-VALUE
-Info_tile_offset(VALUE self)
-{
-    Info *info;
-    const char *tile_offset;
 
-    Data_Get_Struct(self, Info, info);
-
-    tile_offset = GetImageOption(info, "tile-offset");
-
-    if (!tile_offset)
-    {
-        return Qnil;
-    }
-
-    return rb_str_new2(tile_offset);
+    return tc_arg;
 }
 
 
 /**
  * Undefine image option.
  *
- * Ruby usage:
- *   - @verbatim Info#undefine(format,key) @endverbatim
- *
- * @param self this object
- * @param format the format
- * @param key the key
- * @return self
+ * @param format [String] the format
+ * @param key [String] the key
+ * @return [Magick::Info] self
  */
 VALUE
 Info_undefine(VALUE self, VALUE format, VALUE key)
@@ -2419,20 +2208,16 @@ Info_undefine(VALUE self, VALUE format, VALUE key)
     snprintf(fkey, sizeof(fkey), "%.60s:%.*s", format_p, (int)(MaxTextExtent-61), key_p);
 
     Data_Get_Struct(self, Info, info);
-    (void) DeleteImageOption(info, fkey);
+    DeleteImageOption(info, fkey);
 
     return self;
 }
 
 
 /**
- * Return the undercolor color as a String.
+ * Return the undercolor color.
  *
- * Ruby usage:
- *   - @verbatim Info#undercolor @endverbatim
- *
- * @param self this object
- * @return the undercolor
+ * @return [String] the undercolor
  */
 VALUE
 Info_undercolor(VALUE self)
@@ -2443,13 +2228,8 @@ Info_undercolor(VALUE self)
 /**
  * Set the undercolor color.
  *
- * Ruby usage:
- *   - @verbatim Info#undercolor= @endverbatim
- *
- * @param self this object
- * @param color the undercolor color as a String
- * @return self
- * @throw ArgumentError
+ * @param color [String] the undercolor color
+ * @return [String] the given value
  */
 VALUE
 Info_undercolor_eq(VALUE self, VALUE color)
@@ -2460,11 +2240,7 @@ Info_undercolor_eq(VALUE self, VALUE color)
 /**
  * Get the resolution type.
  *
- * Ruby usage:
- *   - @verbatim Info#units @endverbatim
- *
- * @param self this object
- * @return the resolution type
+ * @return [Magick::ResolutionType] the resolution type
  */
 VALUE
 Info_units(VALUE self)
@@ -2478,13 +2254,8 @@ Info_units(VALUE self)
 /**
  * Set the resolution type
  *
- * Ruby usage:
- *   - @verbatim Info#units= @endverbatim
- *
- * @param self this object
- * @param units the resolution type
- * @return units
- * @throw ArgumentError
+ * @param units [Magick::ResolutionType] the resolution type
+ * @return [Magick::ResolutionType] the given value
  */
 VALUE
 Info_units_eq(VALUE self, VALUE units)
@@ -2499,11 +2270,7 @@ Info_units_eq(VALUE self, VALUE units)
 /**
  * Get FlashPix viewing parameters.
  *
- * Ruby usage:
- *   - @verbatim Info#view @endverbatim
- *
- * @param self this object.
- * @return the viewing parameters
+ * @return [String] the viewing parameters
  */
 VALUE
 Info_view(VALUE self)
@@ -2511,18 +2278,18 @@ Info_view(VALUE self)
     Info *info;
 
     Data_Get_Struct(self, Info, info);
+#if defined(IMAGEMAGICK_7)
+    return C_str_to_R_str(GetImageOption(info, "fpx:view"));
+#else
     return C_str_to_R_str(info->view);
+#endif
 }
 
 /**
  * Set FlashPix viewing parameters.
  *
- * Ruby usage:
- *   - @verbatim Info#view= @endverbatim
- *
- * @param self this object
- * @param view_arg the viewing parameters
- * @return view_arg
+ * @param view_arg [String] the viewing parameters
+ * @return [String] the given value
  */
 VALUE
 Info_view_eq(VALUE self, VALUE view_arg)
@@ -2534,9 +2301,19 @@ Info_view_eq(VALUE self, VALUE view_arg)
 
     if (!NIL_P(view_arg))
     {
-        view = StringValuePtr(view_arg);
+        view = StringValueCStr(view_arg);
     }
 
+#if defined(IMAGEMAGICK_7)
+    if (view)
+    {
+        SetImageOption(info, "fpx:view", view);
+    }
+    else
+    {
+        RemoveImageOption(info, "fpx:view");
+    }
+#else
     if (info->view)
     {
         magick_free(info->view);
@@ -2546,12 +2323,13 @@ Info_view_eq(VALUE self, VALUE view_arg)
     {
         magick_clone_string(&info->view, view);
     }
+#endif
     return view_arg;
 }
 
 
 /**
- * If there is a texture image, delete it before destroying the ImageInfo
+ * If there is a texture image, delete it before destroying the Image::Info
  * structure.
  *
  * No Ruby usage (internal function)
@@ -2570,12 +2348,12 @@ destroy_Info(void *infoptr)
         info->texture = NULL;
     }
 
-    (void) DestroyImageInfo(info);
+    DestroyImageInfo(info);
 }
 
 
 /**
- * Create an ImageInfo object.
+ * Create an Image::Info object.
  *
  * No Ruby usage (internal function)
  *
@@ -2627,10 +2405,11 @@ rm_info_new(void)
 /**
  * If an initializer block is present, run it.
  *
- * Ruby usage:
- *   - @verbatim Info#initialize @endverbatim
+ * @overload initialize
+ *
+ * @overload initialize
+ *   @yield [Magick::Image::Info]
  *
- * @param self this object
  * @return self
  */
 VALUE
@@ -2638,8 +2417,16 @@ Info_initialize(VALUE self)
 {
     if (rb_block_given_p())
     {
-        // Run the block in self's context
-        (void) rb_obj_instance_eval(0, NULL, self);
+        if (rb_proc_arity(rb_block_proc()) == 0)
+        {
+            // Run the block in self's context
+            rb_warn("passing a block without an image argument is deprecated");
+            rb_obj_instance_eval(0, NULL, self);
+        }
+        else
+        {
+            rb_yield(self);
+        }
     }
     return self;
 }