Logo Search packages:      
Sourcecode: fenix version File versions  Download package

i_copy.c

/*
 *  Fenix - Videogame compiler/interpreter
 *  Current release       : FENIX - PROJECT 1.0 - R 0.84
 *  Last stable release   :
 *  Project documentation : http://fenix.divsite.net
 *
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 *
 *  Copyright © 1999 José Luis Cebrián Pagüe
 *  Copyright © 2002 Fenix Team
 *
 */

/*
 * FILE        : i_copy.c
 * DESCRIPTION : Struct copy functions based on varspace type info
 *
 * HISTORY:      0.85 - First version
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#ifdef TARGET_BEOS
#include <posix/assert.h>
#else
#include <assert.h>
#endif

#include <math.h>
#include <time.h>

#include "fxi.h"

static int copytype (void * dst, void * src, DCB_TYPEDEF * var);

/*
 *  FUNCTION : copyvars
 *
 *  Copy data using a varspace's type information. It updates the
 *  destination pointer while walking the variables.
 *
 *  PARAMS :
 *          dst                     Pointer to the destination memory
 *          src                     Pointer to the data
 *          var                     Pointer to the type array
 *          nvars             Number of variables (length of var array)
 *
 *  RETURN VALUE :
 *      Number of bytes actually copied
 *
 */

int copyvars (void * dst, void * src, DCB_VAR * var, int nvars)
{
      int result = 0;
      int partial;

      for (; nvars > 0; nvars--, var++)
      {
            partial = copytype (dst, src, &var->Type);
            src = (Uint8*)src + partial;
            dst = (Uint8*)dst + partial;
            result += partial;
      }
      return result;
}


/*
 *  FUNCTION : copytypes
 *
 *  Copy data from memory using type information stored in memory
 *
 *  PARAMS :
 *          dst                     Pointer to the destination memory
 *          src                     Pointer to the source
 *          var                     Pointer to the type array
 *          nvars             Number of variables (length of var array)
 *
 *  RETURN VALUE :
 *      Number of bytes actually coppied
 *
 */

int copytypes (void * dst, void * src, DCB_TYPEDEF * var, int nvars, int reps)
{
      int result = 0;
      int partial;
      DCB_TYPEDEF * _var = var;
      int _nvars = nvars ;

      for (; reps > 0; reps--){
          var = _var;
          nvars = _nvars;
      for (; nvars > 0; nvars--, var++)
      {
            partial = copytype(dst, src, var);
            result += partial;
            src = (Uint8*)src + partial;
            dst = (Uint8*)dst + partial;
      }
    }
      return result;
}

/*
 *  FUNCTION : copytype
 *
 *  Copy one variable using the given type information.
 *
 *  PARAMS :
 *          dst                     Pointer to the file object
 *          src                     Pointer to the data
 *          var                     Pointer to the variable type
 *
 *  RETURN VALUE :
 *      Number of bytes actually written
 *
 */

static int copytype (void * dst, void * src, DCB_TYPEDEF * var)
{
      int count  = 1;
      int result = 0;
      int n      = 0;

      for (;;)
      {
            switch (var->BaseType[n])
            {
                  case TYPE_FLOAT:
                  case TYPE_INT:
                  case TYPE_DWORD:
                        memcpy (dst, src, 4 * count);
                        return 4 * count;
                  case TYPE_WORD:
                  case TYPE_SHORT:
                        memcpy (dst, src, 2 * count);
                        return 2 * count;
                  case TYPE_BYTE:
                  case TYPE_SBYTE:
                  case TYPE_CHAR:
                        memcpy (dst, src, count);
                        return count;
                  case TYPE_STRING:
                        while (count--)
                        {
                              string_discard(*(int *)dst);
                              string_use(*(int *)src);
                              *(int *)dst = *(int *)src;
                              dst = (void *)((int *)dst + 1);
                              src = (void *)((int *)src + 1);
                              result += 4;
                        }
                        return result;
                  case TYPE_ARRAY:
                        count *= var->Count[n];
                        n++;
                        continue;
                  case TYPE_STRUCT:
                        for (; count ; count--)
                        {
                              int partial = copyvars(dst, src,
                                    dcb.varspace_vars[var->Members],
                                    dcb.varspace[var->Members].NVars);
                              src = (Uint8*)src + partial;
                              dst = (Uint8*)dst + partial;
                              result += partial;
                        }
                        break;
                  default:
                        gr_error ("No es posible copiar esta estructura");
                        break;
            }
            break;
      }
      return result;
}

Generated by  Doxygen 1.6.0   Back to index