
ret = cnc_upstart( o_num ) ;
if ( ret ) {
printf( "error in cnc_upstart¥n" ) ;
fca_fclose() ;
fca_bye( 1 ) ;
return ( ret ) ;
}
for (;;) {
number = BUFSIZE - 1 ;
ret = cnc_upload( (struct odbup *)(&buf), &number ) ;
if ( ret ) {
printf( "error in cnc_upload¥n" ) ;
cnc_upend() ;
fca_fclose() ;
fca_bye( 1 ) ;
return ( ret ) ;
}
for ( i = 0 ; i < number ; i++ ) {
ret = fca_putc( buf[4+i] ) ;
if ( ret == -1 ){
printf( "error in fca_putc¥n" ) ;
cnc_upend() ;
fca_fclose() ;
fca_bye( 1 ) ;
return ( ret ) ;
}
printf( "%c", buf[4+i] ) ;
}
if ( buf[4+number-1] == '%' ) break ;
}
printf( "¥n" ) ;
ret = cnc_upend() ;
if ( ret ){
printf( "error in cnc_upend()¥n" ) ;
fca_fclose() ;
fca_bye( 1 ) ;
return ( ret ) ;
}
ret = fca_fclose() ;
if ( ret ) {
printf( "error in fca_close()¥n" ) ;
fca_bye( 1 ) ;
return ( ret ) ;
}
ret = fca_bye( 1 ) ;
if ( ret ) {
printf( "error in fca_bye()¥n" ) ;
}
return ( ret ) ;
}