update limits.c with IMAGER_NO_CONTEXT

[imager.git] / imext.c

diff --git a/imext.c b/imext.c
index c7a5e5c607308f77b983b4145584727ed637b18e..e2e1877027c3d4edaec2d96d3d8b02664d991789 100644 (file)
--- a/imext.c
+++ b/imext.c
@@ -1,5 +1,8 @@
 #include "imexttypes.h"
 #include "imager.h"
 #include "imexttypes.h"
 #include "imager.h"

+#include "imio.h"
+
+static im_context_t get_context(void);

 
 /*
  DON'T ADD CASTS TO THESE
 
 /*
  DON'T ADD CASTS TO THESE


@@ -17,10 +20,10 @@ im_ext_funcs imager_function_table =
     myfree_file_line,
     myrealloc_file_line,
 
     myfree_file_line,
     myrealloc_file_line,
 

-    i_img_8_new,
-    i_img_16_new,
-    i_img_double_new,
-    i_img_pal_new,
+    im_img_8_new,
+    im_img_16_new,
+    im_img_double_new,
+    im_img_pal_new,

     i_img_destroy,
     i_sametype,
     i_sametype_chans,
     i_img_destroy,
     i_sametype,
     i_sametype_chans,


@@ -57,10 +60,10 @@ im_ext_funcs imager_function_table =
     i_quant_translate,
     i_quant_transparent,
 
     i_quant_translate,
     i_quant_transparent,
 

-    i_clear_error,
-    i_push_error,
+    im_clear_error,
+    im_push_error,

     i_push_errorf,
     i_push_errorf,

-    i_push_errorvf,
+    im_push_errorvf,

 
     i_tags_new,
     i_tags_set,
 
     i_tags_new,
     i_tags_set,


@@ -98,9 +101,9 @@ im_ext_funcs imager_function_table =
     i_rubthru,
 
     /* IMAGER_API_LEVEL 2 functions */
     i_rubthru,
 
     /* IMAGER_API_LEVEL 2 functions */

-    i_set_image_file_limits,
-    i_get_image_file_limits,
-    i_int_check_image_file_limits,
+    im_set_image_file_limits,
+    im_get_image_file_limits,
+    im_int_check_image_file_limits,

 
     i_flood_fill_border,
     i_flood_cfill_border,
 
     i_flood_fill_border,
     i_flood_cfill_border,


@@ -115,8 +118,43 @@ im_ext_funcs imager_function_table =
     i_loog,
 
     /* IMAGER_API_LEVEL 4 functions */
     i_loog,
 
     /* IMAGER_API_LEVEL 4 functions */

-    i_img_alloc,
-    i_img_init,
+    im_img_alloc,
+    im_img_init,
+
+    /* IMAGER_API_LEVEL 5 functions */
+    i_img_is_monochrome,
+    i_gsamp_bg,
+    i_gsampf_bg,
+    i_get_file_background,
+    i_get_file_backgroundf,
+    i_utf8_advance,
+    i_render_new,
+    i_render_delete,
+    i_render_color,
+    i_render_fill,
+    i_render_line,
+    i_render_linef,
+
+    /* level 6 */
+    i_io_getc_imp,
+    i_io_peekc_imp,
+    i_io_peekn,
+    i_io_putc_imp,
+    i_io_read,
+    i_io_write,
+    i_io_seek,
+    i_io_flush,
+    i_io_close,
+    i_io_set_buffered,
+    i_io_gets,
+    im_io_new_fd,
+    im_io_new_bufchain,
+    im_io_new_buffer,
+    im_io_new_cb,
+    io_slurp,
+    io_glue_destroy,
+
+    get_context

   };
 
 /* in general these functions aren't called by Imager internally, but
   };
 
 /* in general these functions aren't called by Imager internally, but


@@ -143,7 +181,7 @@ color to the image.
 */
 
 int 
 */
 
 int 

-(i_ppix)(i_img *im, int x, int y, const i_color *val) {
+(i_ppix)(i_img *im, i_img_dim x, i_img_dim y, const i_color *val) {

   return i_ppix(im, x, y, val);
 }
 
   return i_ppix(im, x, y, val);
 }
 


@@ -160,7 +198,7 @@ Returns 0 if the pixel was retrieved, or -1 if not.
 */
 
 int
 */
 
 int

-(i_gpix)(i_img *im,int x,int y,i_color *val) {
+(i_gpix)(i_img *im,i_img_dim x,i_img_dim y,i_color *val) {

   return i_gpix(im, x, y, val);
 }
 
   return i_gpix(im, x, y, val);
 }
 


@@ -179,7 +217,7 @@ color to the image.
 =cut
 */
 int
 =cut
 */
 int

-(i_ppixf)(i_img *im, int x, int y, const i_fcolor *val) {
+(i_ppixf)(i_img *im, i_img_dim x, i_img_dim y, const i_fcolor *val) {

   return i_ppixf(im, x, y, val);
 }
 
   return i_ppixf(im, x, y, val);
 }
 


@@ -197,7 +235,7 @@ Returns 0 if the pixel was retrieved, or -1 if not.
 */
 
 int
 */
 
 int

-(i_gpixf)(i_img *im,int x,int y,i_fcolor *val) {
+(i_gpixf)(i_img *im,i_img_dim x,i_img_dim y,i_fcolor *val) {

   return i_gpixf(im, x, y, val);
 }
 
   return i_gpixf(im, x, y, val);
 }
 


@@ -214,8 +252,8 @@ Returns the number of pixels set.
 =cut
 */
 
 =cut
 */
 

-int
-(i_plin)(i_img *im, int l, int r, int y, const i_color *vals) {
+i_img_dim
+(i_plin)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, const i_color *vals) {

   return i_plin(im, l, r, y, vals);
 }
 
   return i_plin(im, l, r, y, vals);
 }
 


@@ -231,8 +269,8 @@ Returns the number of pixels retrieved.
 =cut
 */
 
 =cut
 */
 

-int
-(i_glin)(i_img *im, int l, int r, int y, i_color *vals) {
+i_img_dim
+(i_glin)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, i_color *vals) {

   return i_glin(im, l, r, y, vals);
 }
 
   return i_glin(im, l, r, y, vals);
 }
 


@@ -249,8 +287,8 @@ Returns the number of pixels set.
 =cut
 */
 
 =cut
 */
 

-int
-(i_plinf)(i_img *im, int l, int r, int y, const i_fcolor *vals) {
+i_img_dim
+(i_plinf)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, const i_fcolor *vals) {

   return i_plinf(im, l, r, y, vals);
 }
 
   return i_plinf(im, l, r, y, vals);
 }
 


@@ -267,8 +305,8 @@ Returns the number of pixels retrieved.
 =cut
 */
 
 =cut
 */
 

-int
-(i_glinf)(i_img *im, int l, int r, int y, i_fcolor *vals) {
+i_img_dim
+(i_glinf)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, i_fcolor *vals) {

   return i_glinf(im, l, r, y, vals);
 }
 
   return i_glinf(im, l, r, y, vals);
 }
 


@@ -289,8 +327,8 @@ channel_count)
 
 =cut
 */
 
 =cut
 */

-int
-(i_gsamp)(i_img *im, int l, int r, int y, i_sample_t *samp, 
+i_img_dim
+(i_gsamp)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, i_sample_t *samp, 

                    const int *chans, int chan_count) {
   return i_gsamp(im, l, r, y, samp, chans, chan_count);
 }
                    const int *chans, int chan_count) {
   return i_gsamp(im, l, r, y, samp, chans, chan_count);
 }


@@ -312,12 +350,48 @@ Returns the number of samples read (which should be (C<right>-C<left>)
 
 =cut
 */
 
 =cut
 */

-int
-(i_gsampf)(i_img *im, int l, int r, int y, i_fsample_t *samp, 
+i_img_dim
+(i_gsampf)(i_img *im, i_img_dim l, i_img_dim r, i_img_dim y, i_fsample_t *samp, 

            const int *chans, int chan_count) {
   return i_gsampf(im, l, r, y, samp, chans, chan_count);
 }
 
            const int *chans, int chan_count) {
   return i_gsampf(im, l, r, y, samp, chans, chan_count);
 }
 

+/*
+=item i_gsamp_bits(im, left, right, y, samples, channels, channel_count, bits)
+=category Drawing
+
+Reads integer samples scaled to C<bits> bits of precision into the
+C<unsigned int> array C<samples>.
+
+Expect this to be slow unless C<< bits == im->bits >>.
+
+Returns the number of samples copied, or -1 on error.
+
+Not all image types implement this method.
+
+Pushes errors, but does not call C<i_clear_error()>.
+
+=cut
+*/
+
+/*
+=item i_psamp_bits(im, left, right, y, samples, channels, channel_count, bits)
+=category Drawing
+
+Writes integer samples scaled to C<bits> bits of precision from the
+C<unsigned int> array C<samples>.
+
+Expect this to be slow unless C<< bits == im->bits >>.
+
+Returns the number of samples copied, or -1 on error.
+
+Not all image types implement this method.
+
+Pushes errors, but does not call C<i_clear_error()>.
+
+=cut
+*/
+

 /*
 =item i_gpal(im, left, right, y, indexes)
 
 /*
 =item i_gpal(im, left, right, y, indexes)
 


@@ -332,8 +406,8 @@ Always returns 0 for direct color images.
 
 =cut
 */
 
 =cut
 */

-int
-(i_gpal)(i_img *im, int x, int r, int y, i_palidx *vals) {
+i_img_dim
+(i_gpal)(i_img *im, i_img_dim x, i_img_dim r, i_img_dim y, i_palidx *vals) {

   return i_gpal(im, x, r, y, vals);
 }
 
   return i_gpal(im, x, r, y, vals);
 }
 


@@ -351,8 +425,8 @@ Always returns 0 for direct color images.
 
 =cut
 */
 
 =cut
 */

-int
-(i_ppal)(i_img *im, int x, int r, int y, const i_palidx *vals) {
+i_img_dim
+(i_ppal)(i_img *im, i_img_dim x, i_img_dim r, i_img_dim y, const i_palidx *vals) {

   return i_ppal(im, x, r, y, vals);
 }
 
   return i_ppal(im, x, r, y, vals);
 }
 


@@ -480,3 +554,20 @@ int
   return i_setcolors(im, index, colors, count);
 }
 
   return i_setcolors(im, index, colors, count);
 }
 

+/*
+=item im_get_context()
+
+Retrieve the context object for the current thread.
+
+Inside Imager itself this is just a function pointer, which the
+Imager.xs BOOT handler initializes for use within perl.  If you're
+taking the Imager code and embedding it elsewhere you need to
+initialize the C<im_get_context> pointer at some point.
+
+=cut
+*/
+
+static im_context_t
+get_context(void) {
+  return im_get_context();
+}