File: column.c

package info (click to toggle)
funtools 1.4.8-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 15,004 kB
  • sloc: ansic: 89,502; sh: 10,714; lex: 4,613; asm: 3,281; ada: 1,681; makefile: 1,468; pascal: 1,089; cpp: 1,001; cs: 879; perl: 161; python: 119; yacc: 64; sed: 38; csh: 10; tcl: 9
file content (36 lines) | stat: -rw-r--r-- 611 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
/*
 *	Copyright (c) 1999-2003 Smithsonian Astrophysical Observatory
 */
#include <column.h>

#ifdef ANSI_FUNC
void
ColumnLoad(char *ibuf, int size, int n, int convert, void *obuf)
#else
void ColumnLoad(ibuf, size, n, convert, obuf)
     char *ibuf;
     int size;
     int n;
     int convert;
     void *obuf;
#endif
{
  register char *iptr;
  register char *optr;
  int i, j;

  if( convert ){
    optr = (char *)obuf;
    iptr = (char *)ibuf;
    for(i=0; i<n; i++){  
      for(j=size-1; j>=0; j--){
	*optr++ = *(iptr+j);
      }
      iptr += size;
    }
  }
  else{
    memcpy(obuf, ibuf, n*size);
  }
}