src/Core/objects/VideoInfo.xs

   1 #include "EXTERN.h"
   2 #include "perl.h"
   3 #include "XSUB.h"
   4
   5 #ifndef aTHX_
   6 #define aTHX_
   7 #endif
   8
   9 #include <SDL.h>
  10
  11 MODULE = SDL::VideoInfo         PACKAGE = SDL::VideoInfo    PREFIX = videoinfo_
  12
  13 =for documentation
  14
  15 SDL_VideoInfo -- Video target information
  16
  17 typedef struct{
  18     Uint32 hw_available:1;
  19     Uint32 wm_available:1;
  20     Uint32 blit_hw:1;
  21     Uint32 blit_hw_CC:1;
  22     Uint32 blit_hw_A:1;
  23     Uint32 blit_sw:1;
  24     Uint32 blit_sw_CC:1;
  25     Uint32 blit_sw_A:1;
  26     Uint32 blit_fill:1;
  27     Uint32 video_mem;
  28     SDL_PixelFormat *vfmt;
  29     int current_w;
  30     int current_h;
  31 } SDL_VideoInfo;
  32
  33
  34
  35 =cut
  36
  37 Uint32
  38 videoinfo_hw_available( videoinfo )
  39
  40         SDL_VideoInfo *videoinfo
  41
  42         CODE:
  43                 RETVAL = videoinfo->hw_available;
  44         OUTPUT:
  45                 RETVAL
  46
  47 Uint32
  48 videoinfo_wm_available( videoinfo )
  49
  50         SDL_VideoInfo *videoinfo
  51
  52         CODE:
  53                 RETVAL = videoinfo->wm_available;
  54         OUTPUT:
  55                 RETVAL
  56
  57 Uint32
  58 videoinfo_blit_hw( videoinfo )
  59
  60         SDL_VideoInfo *videoinfo
  61
  62         CODE:
  63                 RETVAL = videoinfo->blit_hw;
  64         OUTPUT:
  65                 RETVAL
  66
  67 Uint32
  68 videoinfo_blit_hw_CC( videoinfo )
  69
  70         SDL_VideoInfo *videoinfo
  71
  72         CODE:
  73                 RETVAL = videoinfo->blit_hw_CC;
  74         OUTPUT:
  75                 RETVAL
  76
  77
  78 Uint32
  79 videoinfo_blit_hw_A( videoinfo )
  80
  81         SDL_VideoInfo *videoinfo
  82
  83         CODE:
  84                 RETVAL = videoinfo->blit_hw_A;
  85         OUTPUT:
  86                 RETVAL
  87
  88 Uint32
  89 videoinfo_blit_sw( videoinfo )
  90
  91         SDL_VideoInfo *videoinfo
  92
  93         CODE:
  94                 RETVAL = videoinfo->blit_sw;
  95         OUTPUT:
  96                 RETVAL
  97
  98 Uint32
  99 videoinfo_blit_sw_CC( videoinfo )
 100
 101         SDL_VideoInfo *videoinfo
 102
 103         CODE:
 104                 RETVAL = videoinfo->blit_sw_CC;
 105         OUTPUT:
 106                 RETVAL
 107
 108
 109 Uint32
 110 videoinfo_blit_sw_A( videoinfo )
 111
 112         SDL_VideoInfo *videoinfo
 113
 114         CODE:
 115                 RETVAL = videoinfo->blit_sw_A;
 116         OUTPUT:
 117                 RETVAL
 118
 119 Uint32
 120 videoinfo_blit_fill( videoinfo )
 121
 122         SDL_VideoInfo *videoinfo
 123
 124         CODE:
 125                 RETVAL = videoinfo->blit_fill;
 126         OUTPUT:
 127                 RETVAL
 128
 129 Uint32
 130 videoinfo_video_mem( videoinfo )
 131
 132         SDL_VideoInfo *videoinfo
 133
 134         CODE:
 135                 RETVAL = videoinfo->video_mem;
 136         OUTPUT:
 137                 RETVAL
 138
 139
 140 SDL_PixelFormat *
 141 videoinfo_vfmt( videoinfo )
 142
 143         SDL_VideoInfo *videoinfo
 144
 145         PREINIT:
 146
 147                 char* CLASS = "SDL::VideoFormat";
 148
 149         CODE:
 150                 RETVAL = videoinfo->vfmt;
 151         OUTPUT:
 152                 RETVAL
 153
 154 int
 155 videoinfo_current_w( videoinfo )
 156
 157         SDL_VideoInfo *videoinfo
 158
 159         CODE:
 160                 RETVAL = videoinfo->current_w;
 161         OUTPUT:
 162                 RETVAL
 163
 164 int
 165 videoinfo_current_h( videoinfo )
 166
 167         SDL_VideoInfo *videoinfo
 168
 169         CODE:
 170                 RETVAL = videoinfo->current_h;
 171         OUTPUT:
 172                 RETVAL
 173
 174
 175
 176
 177