compilation

Author: sfomel

trip/iwave/acd/include/adStack.h

@@ -66,19 +66,19 @@ extern void pushNarray(char *x, unsigned int nbChars) ;
 extern void popNarray(char *x, unsigned int nbChars) ;
 extern void lookNarray(char *x, unsigned int nbChars) ;
 
-extern void resetadlookstack_() ;
+extern void resetadlookstack_(void) ;
 
 extern void printbigbytes(long int nbblocks, long int blocksz, long int nbunits) ;
 
-extern void printctraffic_() ;
+extern void printctraffic_(void) ;
 
-extern void printtopplace_() ;
+extern void printtopplace_(void) ;
 
-extern void printstackmax_() ;
+extern void printstackmax_(void) ;
 
-extern void printlookingplace_() ;
+extern void printlookingplace_(void) ;
 
-extern void showrecentcstack_() ;
+extern void showrecentcstack_(void) ;
 
 extern void getbigcsizes_(int *nbblocks, int *remainder, int *nbblockslook, int *lookremainder) ;
 

trip/iwave/acd/lib/adBuffer.c

@@ -23,7 +23,7 @@ void addftraffic(int n) {
   }
 }
 
-void printtraffic() {
+void printtraffic(void) {
   printctraffic_() ;
   printf(" F Traffic: ") ;
   printbigbytes(mmftrafficM, 1000000, mmftraffic) ;
@@ -496,7 +496,7 @@ void poppointer8(char **x) {
  * the global C stack followed by the auxiliary stacks.
  * Also shows the "looking" stack position if relevant,
  * and -999 if not relevant. */
-void printallbuffers() {
+void printallbuffers(void) {
   int cblocks,csize,lookcblocks,lookcsize,lookbufsize ;
   getbigcsizes_(&cblocks,&csize,&lookcblocks,&lookcsize) ;
   printf("MAIN C stack size :%8iB +%5i bytes (looking:%8iB +%5i)\n",
@@ -513,7 +513,7 @@ void printallbuffers() {
   printf(" plus POINTERs8:%4i bytes (looking:%4i)\n", adp8ibuf*8, lookbufsize) ;
 }
 
-void printbuffertop() {
+void printbuffertop(void) {
   int size = 0 ;
   size += adi4ibuf*4 ;
   size += adr4ibuf*4 ;
@@ -524,7 +524,7 @@ void printbuffertop() {
          size, (int)(size/1024.0)) ;
 }
 
-void showallstacks() {
+void showallstacks(void) {
   int i ;
   printf("BIT STACK      : %x == %i\n",adbitbuf,adbitbuf) ; 
   printf("INTEGER*4 BUFFER[%i]:",adi4ibuf) ;

trip/iwave/acd/lib/adStack.c

@@ -159,7 +159,7 @@ void lookNarray(char *x, unsigned int nbChars) {
   }
 }
 
-void resetadlookstack_() {
+void resetadlookstack_(void) {
   lookStack=NULL ;
 }
 
@@ -554,7 +554,7 @@ void printbigbytes(long int nbblocks, long int blocksz, long int nbunits) {
   printf("%i",res0) ;
 }
 
-void printctraffic_() {
+void printctraffic_(void) {
   printf(" C Traffic: ") ;
   printbigbytes(mmctrafficM, 1000000, mmctraffic) ;
   printf(" bytes\n") ;
@@ -566,7 +566,7 @@ void printftrafficinc_(long int *mmfM, int *mmfsz, int *mmf) {
   printf(" bytes\n") ;
 }
 
-void printtopplace_() {
+void printtopplace_(void) {
     DoubleChainedBlock *stack = curStack ;
     int nbBlocks = (stack?-1:0) ;
     int remainder = 0;
@@ -594,7 +594,7 @@ void printtopplacenum_(int *n) {
     printf(" bytes\n") ;
 }
 
-void printstackmax_() {
+void printstackmax_(void) {
     DoubleChainedBlock *stack = curStack ;
     int nbBlocks = (stack?-2:0) ;
     /*    int remainder = 0; */
@@ -614,7 +614,7 @@ void printstackmax_() {
     printf(" bytes\n") ;
 }
 
-void printlookingplace_() {
+void printlookingplace_(void) {
     if (lookStack == NULL)
 	printtopplace_() ;
     else {
@@ -631,7 +631,7 @@ void printlookingplace_() {
     }
 }
 
-void showrecentcstack_() {
+void showrecentcstack_(void) {
   if (curStack && curStackTop) {
     int totalNumChars = 30 ;
     DoubleChainedBlock *stack = curStack ;

trip/iwave/core/lib/fd.cc

@@ -232,7 +232,7 @@ int fd_modelcrea(IPNT cdims, IPNT crank, PARARRAY * par, FILE * stream, IMODEL *
     IPNT gs, ge;
     IPNT dgsr[IWAVE_NNEI], dger[IWAVE_NNEI];                        /*< receive domains */
     IPNT dgsrs[IWAVE_NNEI][RDOM_MAX_NARR], dgers[IWAVE_NNEI][RDOM_MAX_NARR];   /*< all receive domains */
-    int frcvempty[IWAVE_NNEI], rcvne;                       /*< empty receive flag */
+    int frcvempty[IWAVE_NNEI];                       /*< empty receive flag */
 
     /*< grid type in each dimension: primal grid (=0) or dual grid
       (=1) */
@@ -352,8 +352,8 @@ int fd_modelcrea(IPNT cdims, IPNT crank, PARARRAY * par, FILE * stream, IMODEL *
 	}
 	/* TODO: change process receives below */
 	/* First, check that only P and V are received */
-	rcvne = 0;
-	for ( i = 0; i < nnei; ++i ) if ( !(frcvempty[i]) ) ++rcvne;
+	/*	rcvne = 0;
+		for ( i = 0; i < nnei; ++i ) if ( !(frcvempty[i]) ) ++rcvne; */
 
 	/* Second, store receive domains */
 	for ( i = 0; i < nnei; ++i ) {

trip/iwave/core/lib/iwavefun.cc

@@ -83,17 +83,17 @@ int initoutstream(FILE ** stream, int rk, int sz) {
     if ((aaa > 1) && ( bbb != '/')) 
 	strcat(filename,"/");
     if      ( sz < 10 )
-	sprintf(tmp,"cout%01d.txt",rk);
+      snprintf(tmp,20,"cout%01d.txt",rk);
     else if ( sz < 100 )
-	sprintf(tmp,"cout%02d.txt",rk);
+      snprintf(tmp,20,"cout%02d.txt",rk);
     else if ( sz < 1000 )
-	sprintf(tmp,"cout%03d.txt",rk);
+      snprintf(tmp,20,"cout%03d.txt",rk);
     else if ( sz < 10000 )
-	sprintf(tmp,"cout%04d.txt",rk);
+      snprintf(tmp,20,"cout%04d.txt",rk);
     else if ( sz < 100000 )
-	sprintf(tmp,"cout%05d.txt",rk);
+      snprintf(tmp,20,"cout%05d.txt",rk);
     else
-	sprintf(tmp,"cout%d.txt",rk);
+      snprintf(tmp,20,"cout%d.txt",rk);
 
     strcat(filename,tmp);
 

trip/iwave/core/lib/rdomain.cc

@@ -391,7 +391,7 @@ int rd_a_fsprint(RDOM *dom, const char *path)
 
     for ( a = 0; a < dom->narr; ++a )
     {
-        if ( sprintf(path2, "%s%d", path, a) < 0 ) return E_OTHER;
+      if ( snprintf(path2, 70, "%s%d", path, a) < 0 ) return E_OTHER;
 
         err = ra_fprint(dom->_s + a, path2);
         if ( err ) return err;

trip/iwave/sucore/src/xdrhdrsub.c

@@ -289,5 +289,5 @@ int xdrhdrsub(XDR *segy_xdr, segy *trace)
  return(status);
 }
 #else
-void xdrhdrsub(){return;}
+void xdrhdrsub(void){return;}
 #endif