corner_to_subfield_sb()

static int corner_to_subfield_sb ( stringbuffer_t *  sb, double  decimal_degrees, const char *  format, char  subfield  )

static

decimal degrees

decimal minutes

degrees/minutes/seconds (dddmmss)

Definition at line 231 of file lwgeom_out_marc21.c.

                                                                                                               {
 
        char cardinal_direction;
        char decimal_separator;
 
        int degrees = (int) decimal_degrees;
        double minutes = fabs((decimal_degrees-degrees)*60);
        double seconds = fabs((minutes-(int)minutes) *60);
 
        int has_cardinal_direction = 0;
        int num_decimals = 0;
        char* res = palloc(sizeof(char)*strlen(format)+2);
 
        /* size of the buffer for the output snprintf calls.
         * the output strings must have the same length as the format.
         * +1 to make room for the null character '\0' */
        size_t buffer_size = strlen(format)+1;
 
        /* +1 one digit to the buffer size in case of negative
         * numbers to account for the "-" sign */
        if(degrees < 0) buffer_size = buffer_size+1;
 
 
        POSTGIS_DEBUGF(2,"corner_to_subfield_sb called with coordinates: %f and format: %s",decimal_degrees,format);
 
        if((int)(seconds + 0.5)>=60) {
 
                seconds = seconds-60;
                minutes = minutes +1;
 
        }
 
 
        if(strchr(format, '.')) {
                num_decimals = strlen(strchr(format, '.'))-1;
                decimal_separator = '.';
        }
 
        if(strchr(format, ',')) {
                num_decimals = strlen(strchr(format, ','))-1;
                decimal_separator = ',';
        }
 
        if(format[0]=='h'){
 
                has_cardinal_direction = 1;
 
                if(subfield=='d'||subfield=='e'){
 
                        if(decimal_degrees>0){
 
                                cardinal_direction='E';
 
                        } else {
 
                                cardinal_direction='W';
                                degrees=abs(degrees);
                                decimal_degrees= fabs(decimal_degrees);
 
                        }
                }
 
                if(subfield=='f'||subfield=='g'){
 
                        if(decimal_degrees>0){
 
                                cardinal_direction='N';
 
                        } else {
 
                                cardinal_direction='S';
                                degrees=abs(degrees);
                                decimal_degrees= fabs(decimal_degrees);
 
                        }
                }
 
 
        }
 
        if(format[3+has_cardinal_direction]=='.' || format[3+has_cardinal_direction]==',' )     {
 
                int pad_degrees = (int)strlen(format);
 
                if(decimal_degrees <0 && decimal_degrees>-100) pad_degrees=strlen(format)+1;
 
                if(has_cardinal_direction) pad_degrees=pad_degrees-1;
 
                snprintf(res,buffer_size,"%0*.*f",pad_degrees,num_decimals,decimal_degrees);
 
 
        } else if(format[5+has_cardinal_direction]=='.' || format[5+has_cardinal_direction]==',' )      {
 
                int pad_minutes = 0;
 
                if(minutes<10) pad_minutes = (int)strlen(format)-has_cardinal_direction-3;
 
                snprintf(res,buffer_size,"%.3d%0*.*f",degrees,pad_minutes,num_decimals,fabs(minutes));
 
        }
 
        else if(format[7+has_cardinal_direction]=='.' || format[7+has_cardinal_direction]==',') {
 
                /*
                 * decimal seconds
                 */
 
                int pad_seconds = 0;
 
                if(seconds<10) pad_seconds = (int) strlen(format)-has_cardinal_direction-5;
 
                snprintf(res,buffer_size,"%.3d%.2d%0*.*f",degrees,(int)minutes,pad_seconds,num_decimals,fabs(seconds));
 
        } else {
 
                snprintf(res,buffer_size,"%.3d%.2d%.2d",degrees,(int)minutes,(int)(seconds + 0.5));
 
        }
 
 
        if(decimal_separator==','){
 
                res[strlen(res)-num_decimals-1] = ',';
 
        }
 
        if(has_cardinal_direction){
 
                if (stringbuffer_aprintf(sb, "<subfield code=\"%c\">%c%s</subfield>", subfield, cardinal_direction, res) < 0) return LW_FAILURE;
 
        } else {
 
                if (stringbuffer_aprintf(sb, "<subfield code=\"%c\">%s</subfield>",     subfield, res) < 0)     return LW_FAILURE;
 
        }
 
 
        pfree(res);
        return LW_SUCCESS;
 
 
 
}

References buffer_size, LW_FAILURE, LW_SUCCESS, and stringbuffer_aprintf().

Referenced by gbox_to_marc21_sb().

Here is the call graph for this function:

Here is the caller graph for this function: