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

Linux Cross Reference
Tina6/tina-libs/tina/file/fileGeom2_wrt.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/fileGeom2_wrt.c,v $
 37  * Date    :  $Date: 2009/01/26 01:22:19 $
 38  * Version :  $Revision: 1.3 $
 39  * CVS Id  :  $Id: fileGeom2_wrt.c,v 1.3 2009/01/26 01:22:19 paul Exp $
 40  *
 41  * Author  :  Legacy TINA
 42  *
 43  * Notes   :
 44  * 
 45  *
 46  *********
 47 */
 48 
 49 #include "fileGeom2_wrt.h"
 50 
 51 #if HAVE_CONFIG_H
 52   #include <config.h>
 53 #endif
 54 
 55 #include <stdio.h>
 56 #include <tina/sys/sysPro.h>
 57 #include <tina/sys/sysDef.h>
 58 #include <tina/math/mathPro.h>
 59 #include <tina/math/mathDef.h>
 60 #include <tina/vision/visDef.h>
 61 #include <tina/vision/visPro.h>
 62 
 63 void    line2_fprint(FILE * fp, Line2 * line)
 64 {
 65     (void) fprintf(fp, "S %d 1 %f ", line->label, line->length);
 66     vec3_print(fp, vec3_of_vec2(line->p1));
 67     vec3_print(fp, vec3_of_vec2(line->p2));
 68     vec3_print(fp, vec3_of_vec2(line->v));
 69     (void) fprintf(fp, "\n");
 70 }
 71 
 72 void    conic2_fprint(FILE * fp, Conic * conic)
 73 {
 74     if (conic->type != ELLIPSE)
 75         return;
 76 
 77     (void) fprintf(fp, "E %d ", conic->label);
 78     vec3_print(fp, vec3_of_vec2(conic->center));
 79     vec3_print(fp, vec3(1.0, 0.0, 0.0));
 80     vec3_print(fp, vec3(0.0, 1.0, 0.0));
 81     (void) fprintf(fp, "%f %f %f ", conic->theta, conic->alpha, conic->beta);
 82     (void) fprintf(fp, "%f %f\n", conic->t1, conic->t2);
 83 }
 84 
 85 static void geom_fprintf(void *geom, int type, FILE * fp)
 86 {
 87     switch (type)
 88     {
 89         case LINE2:
 90         line2_fprint(fp, (Line2 *) geom);
 91         break;
 92     case CONIC2:
 93         conic2_fprint(fp, (Conic *) geom);
 94         break;
 95     default:
 96         break;
 97     }
 98 }
 99 
100 /* BUGFIX: Julian Briggs 1/11/93. Was:List   *geom2_write_fp(FILE * fp,
101  * List * geom) */
102 void    geom2_write_fp(FILE * fp, List * geom)
103 {
104     reclist_list_apply(geom, geom_fprintf, 0, fp);
105 }
106 
107 void    geom2_write(char *pathname, List * geom)
108 {
109     char    temps[256];
110     FILE   *fp;
111 
112     if ((fp = fopen(pathname, "w")) == NULL)
113     {
114         (void) string_append(temps, "can not open file ", pathname, 0);
115         error(temps, non_fatal);
116         return;
117     }
118     geom2_write_fp(fp, geom);
119     (void) fclose(fp);
120 }
121 
122 void    line2_write_geom(char *pathname, List * geom)   /* historical */
123 
124 
125 {
126     geom2_write(pathname, geom);
127 }
128 

~ [ 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.