scalos/Plugins/Preview/Video/compat_os4.c

   1 // Video.c
   2 // $Date$
   3 // $Revision$
   4
   5 #include <exec/types.h>
   6 #include <scalos/scalos.h>
   7 #include <utility/hooks.h>
   8 #include <stdarg.h>
   9 #include <stdlib.h>
  10 #include <string.h>
  11 #include <errno.h>
  12 #include <ctype.h>
  13 #include <limits.h>
  14 #include <stdio.h>
  15
  16 #include <clib/alib_protos.h>
  17
  18 #include <proto/dos.h>
  19 #include <proto/exec.h>
  20 #include <proto/utility.h>
  21
  22 #include <defs.h>
  23
  24 #include "Video.h"
  25
  26 //---------------------------------------------------------------------------------------
  27
  28 BOOL InitExtra(void)
  29 {
  30         return TRUE;
  31 }
  32
  33 void ExitExtra(void)
  34 {
  35 }
  36
  37 BOOL InitInstance(void)
  38 {
  39         return TRUE;
  40 }
  41
  42 void ExitInstance(void)
  43 {
  44 }
  45
  46 //---------------------------------------------------------------------------------------
  47
  48 /*
  49 The memalign() function returns a block of memory of
  50 size bytes aligned to blocksize. The blocksize must be given
  51 as a power of two. It sets errno and returns a null pointer upon failure.
  52
  53 Pointers returned by memalign() may be passed to free().
  54 Pointers passed to realloc() are checked and if not
  55 aligned to the system, the realloc() fails and returns NULL.
  56 */
  57 void *memalign(size_t blocksize, size_t bytes)
  58 {
  59         d1(KPrintF("%s/%s/%ld: blocksize=%lu  bytes=%lu\n", __FILE__, __FUNC__, __LINE__, blocksize, bytes));
  60         (void) blocksize;
  61
  62         return malloc(bytes);
  63 }
  64
  65 //-----------------------------------------------------------------------------
  66
  67 void *gethostbyname(const char *s)
  68 {
  69         (void)s;
  70
  71         return NULL;
  72 }
  73
  74 //-----------------------------------------------------------------------------
  75
  76 /*
  77     These functions shall round their argument to the nearest integer value,
  78     rounding according to the current rounding direction.
  79
  80 RETURN VALUE
  81     Upon successful completion, these functions shall return the rounded integer value.
  82     [MX] [Option Start] If x is NaN, a domain error shall occur, and an unspecified value is returned.
  83     If x is +Inf, a domain error shall occur and an unspecified value is returned.
  84     If x is -Inf, a domain error shall occur and an unspecified value is returned.
  85     If the correct value is positive and too large to represent as a long long, a domain error shall occur and an unspecified value is returned.
  86     If the correct value is negative and too large to represent as a long long, a domain error shall occur and an unspecified value is returned. [Option End]
  87 */
  88
  89 long long int llrint(double x)
  90 {
  91 #warning need some work here
  92         return (long long) x;
  93 }
  94
  95 //-----------------------------------------------------------------------------
  96