Imager-File-TIFF
view release on metacpan or search on metacpan
int allow_incomplete
int page
void
i_readtiff_multi_wiol(ig)
Imager::IO ig
PREINIT:
i_img **imgs;
int count;
int i;
PPCODE:
imgs = i_readtiff_multi_wiol(ig, &count);
if (imgs) {
EXTEND(SP, count);
for (i = 0; i < count; ++i) {
SV *sv = sv_newmortal();
sv_setref_pv(sv, "Imager::ImgRaw", (void *)imgs[i]);
PUSHs(sv);
}
myfree(imgs);
}
const char *
i_tiff_buildversion(...)
C_ARGS:
const char *
i_tiff_libversion(...)
C_ARGS:
void
i_tiff_codecs(class)
PPCODE:
size_t count;
i_tiff_codec *codecs = i_tiff_get_codecs(&count);
EXTEND(SP, count);
for (int i = 0; i < count; ++i) {
i_tiff_codec *codec = codecs + i;
HV *hv = newHV();
hv_stores(hv, "description", newSVpvn(codec->description, strlen(codec->description)));
hv_stores(hv, "name", newSVpv(codec->name, 0));
hv_stores(hv, "code", newSViv(codec->code));
SV *rv = newRV_noinc((SV*)hv);
( run in 1.377 second using v1.01-cache-2.11-cpan-5511b514fd6 )