home *** CD-ROM | disk | FTP | other *** search
- /*
- * jmempas.c
- *
- * This file maps the jpeg memory management calls into the Delphi memory
- * manager. This file is equivalent to jmemnobs.c, which assumes the
- * operating system will take care of allocating and swapping virtual memory
- * as needed for large memory requests.
- */
-
- #define JPEG_INTERNALS
- #include "jinclude.h"
- #include "jpeglib.h"
- #include "jmemsys.h" /* import the system-dependent declarations */
-
- extern void GetMem (void **ptr, size_t size);
- extern void FreeMem (void *ptr);
-
- /*
- * Memory allocation and freeing are controlled by the regular library
- * routines malloc() and free().
- */
-
- GLOBAL(void *)
- jpeg_get_small (j_common_ptr cinfo, size_t sizeofobject)
- {
- void * temp;
- GetMem(temp, sizeofobject);
- return (temp);
- }
-
- GLOBAL(void)
- jpeg_free_small (j_common_ptr cinfo, void * object, size_t sizeofobject)
- {
- FreeMem(object);
- }
-
-
- /*
- * "Large" objects are treated the same as "small" ones.
- * NB: although we include FAR keywords in the routine declarations,
- * this file won't actually work in 80x86 small/medium model; at least,
- * you probably won't be able to process useful-size images in only 64KB.
- */
-
- GLOBAL(void FAR *)
- jpeg_get_large (j_common_ptr cinfo, size_t sizeofobject)
- {
- return (void FAR *) jpeg_get_small(cinfo, sizeofobject);
- }
-
- GLOBAL(void)
- jpeg_free_large (j_common_ptr cinfo, void FAR * object, size_t sizeofobject)
- {
- jpeg_free_small(cinfo, object, sizeofobject);
- }
-
-
- /*
- * This routine computes the total memory space available for allocation.
- * Here we always say, "we got all you want bud!"
- */
-
- GLOBAL(long)
- jpeg_mem_available (j_common_ptr cinfo, long min_bytes_needed,
- long max_bytes_needed, long already_allocated)
- {
- return max_bytes_needed;
- }
-
-
- /*
- * Backing store (temporary file) management.
- * Since jpeg_mem_available always promised the moon,
- * this should never be called and we can just error out.
- */
-
- GLOBAL(void)
- jpeg_open_backing_store (j_common_ptr cinfo, backing_store_ptr info,
- long total_bytes_needed)
- {
- ERREXIT(cinfo, JERR_NO_BACKING_STORE);
- }
-
-
- /*
- * These routines take care of any system-dependent initialization and
- * cleanup required. Here, there isn't any.
- */
-
- GLOBAL(long)
- jpeg_mem_init (j_common_ptr cinfo)
- {
- return 0; /* just set max_memory_to_use to 0 */
- }
-
- GLOBAL(void)
- jpeg_mem_term (j_common_ptr cinfo)
- {
- /* no work */
- }
-