~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~ [ freetext search ] ~ [ file search ] ~

Linux Cross Reference
Tina5/tina-libs/tina/file/fileHips_io.c

Version: ~
Architecture: ~ [ i386 ] ~ [ alpha ] ~ [ m68k ] ~ [ mips ] ~ [ ppc ] ~ [ sparc ] ~ [ sparc64 ] ~

  1 /**********
  2  * 
  3  * Copyright (c) 2003, Division of Imaging Science and Biomedical Engineering,
  4  * University of Manchester, UK.  All rights reserved.
  5  * 
  6  * Redistribution and use in source and binary forms, with or without modification, 
  7  * are permitted provided that the following conditions are met:
  8  * 
  9  *   . Redistributions of source code must retain the above copyright notice, 
 10  *     this list of conditions and the following disclaimer.
 11  *    
 12  *   . Redistributions in binary form must reproduce the above copyright notice,
 13  *     this list of conditions and the following disclaimer in the documentation 
 14  *     and/or other materials provided with the distribution.
 15  * 
 16  *   . Neither the name of the University of Manchester nor the names of its
 17  *     contributors may be used to endorse or promote products derived from this 
 18  *     software without specific prior written permission.
 19  * 
 20  * 
 21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 
 22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
 23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
 24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE 
 25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 
 26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 
 27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 
 29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 
 30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
 31  * POSSIBILITY OF SUCH DAMAGE.
 32  *
 33  **********
 34  * 
 35  * Program :    TINA
 36  * File    :  $Source: /home/tina/cvs/tina-libs/tina/file/fileHips_io.c,v $
 37  * Date    :  $Date: 2005/01/23 19:10:21 $
 38  * Version :  $Revision: 1.3 $
 39  * CVS Id  :  $Id: fileHips_io.c,v 1.3 2005/01/23 19:10:21 paul Exp $
 40  *
 41  * Notes :
 42  *
 43  *  a.lacey@man.ac.uk 29.7.02
 44  *  design of this is based on limited data sets and will probably need to evolve 
 45  *  as and when new datasets become available
 46  *
 47  *********
 48 */
 49 
 50 #include "fileHips_io.h"
 51 
 52 #if HAVE_CONFIG_H
 53   #include <config.h>
 54 #endif
 55 
 56 #include <stdlib.h>
 57 #include <string.h>
 58 #include <tina/sys/sysPro.h>
 59 #include <tina/sys/sysDef.h>
 60 #include <tina/image/imgDef.h>
 61 #include <tina/image/imgPro.h>
 62 #include <tina/file/file_UtilPro.h>
 63 
 64 
 65 #define HIPS_HDR_LEN    134
 66 
 67 
 68 static int hips_read_head(FILE *fp, int *h, int *w)
 69 {
 70         int   i = 0, ncount = 0;
 71         char    buffer[HIPS_HDR_LEN];
 72  
 73         if (fread(buffer, (size_t)1, (size_t)HIPS_HDR_LEN, fp) != HIPS_HDR_LEN)
 74                 return -1;
 75 
 76         if (strncmp(buffer, "HIPS", 4))
 77                 return -2;
 78 
 79         while (ncount < 5)
 80                 if (buffer[i++] == '\n')
 81                         ncount++;
 82 
 83         if (!sscanf(&(buffer[i]), "%d", h))
 84                 return -3;
 85         while (buffer[i++] != '\n');
 86         if (!sscanf(&(buffer[i]), "%d", w))
 87                 return -3;
 88 
 89   return 0;
 90 }
 91 
 92 
 93 Imrect *tina_hips_read_image(const char *pathname)
 94 {
 95         FILE    *fp = NULL;
 96         Imrect  *imrect = NULL;
 97         int      height, width;
 98 
 99         if ((fp = fopen(pathname, "r")) == NULL)
100         {
101            error("tina_hips_read_image : cannot open file", warning);
102            return(NULL);
103         }
104 
105         if (!hips_read_head(fp, &height, &width))
106         {
107                 /* frig height */
108                 height--;
109                 imrect = im_alloc(height, width, NULL, uchar_v);
110                 if (!fread_imrect_data(imrect, fp, pathname))
111                 {
112                         im_free(imrect);
113                         imrect = NULL;
114                 }
115         }
116 
117         return imrect;
118 }
119 
120 

~ [ source navigation ] ~ [ diff markup ] ~ [ identifier search ] ~ [ freetext search ] ~ [ file search ] ~

This page was automatically generated by the LXR engine.
Visit the LXR main site for more information.