Changeset 61485


Ignore:
Timestamp:
Dec 12, 2009, 10:06:47 PM (10 years ago)
Author:
toby@…
Message:

pextlib1.0: whitespace

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/pextlib1.0/curl.c

    r61330 r61485  
    136136                CURLcode theCurlCode;
    137137                struct curl_slist *headers = NULL;
    138                
     138
    139139                /* we might have options and then the url and the file */
    140140                /* let's process the options first */
    141                
     141
    142142                optioncrsr = 2;
    143143                lastoption = objc - 3;
     
    145145                        /* get the option */
    146146                        const char* theOption = Tcl_GetString(objv[optioncrsr]);
    147                        
     147
    148148                        if (strcmp(theOption, "-v") == 0) {
    149149                                noprogress = 0;
     
    164164                                                TCL_STATIC);
    165165                                        theResult = TCL_ERROR;
    166                                         break;                                 
     166                                        break;
    167167                                }
    168168                        } else if (strcmp(theOption, "--effective-url") == 0) {
     
    176176                                                TCL_STATIC);
    177177                                        theResult = TCL_ERROR;
    178                                         break;                                 
     178                                        break;
    179179                                }
    180180                        } else if (strcmp(theOption, "--user-agent") == 0) {
     
    188188                                                TCL_STATIC);
    189189                                        theResult = TCL_ERROR;
    190                                         break;                                 
     190                                        break;
    191191                                }
    192192                        } else {
     
    198198                                break;
    199199                        }
    200                        
     200
    201201                        optioncrsr++;
    202202                }
    203                
     203
    204204                if (optioncrsr <= lastoption) {
    205205                        /* something went wrong */
     
    213213                        /* Retrieve the url */
    214214                        theURL = Tcl_GetString(objv[objc - 2]);
    215        
     215
    216216                        /* Retrieve the file path */
    217217                        theFilePath = Tcl_GetString(objv[objc - 1]);
     
    221221                        break;
    222222                }
    223                
     223
    224224                /* Open the file */
    225225                theFile = fopen( theFilePath, "w" );
     
    227227                        Tcl_SetResult(interp, strerror(errno), TCL_VOLATILE);
    228228                        theResult = TCL_ERROR;
    229                         break;
     229                        break;
    230230                }
    231231
    232232                /* Create the CURL handle */
    233233                theHandle = curl_easy_init();
    234                
     234
    235235                /* Setup the handle */
    236236                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_URL, theURL);
     
    239239                        break;
    240240                }
    241                
     241
    242242                /* -L option */
    243243                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_FOLLOWLOCATION, 1);
     
    261261                }
    262262
    263         /* -A option */
    264         theCurlCode = curl_easy_setopt(theHandle, CURLOPT_USERAGENT, userAgent);
    265         if (theCurlCode != CURLE_OK) {
    266             theResult = SetResultFromCurlErrorCode(interp, theCurlCode);
    267             break;
    268         }
     263                /* -A option */
     264                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_USERAGENT, userAgent);
     265                if (theCurlCode != CURLE_OK) {
     266                        theResult = SetResultFromCurlErrorCode(interp, theCurlCode);
     267                        break;
     268                }
    269269
    270270                /* skip the header data */
     
    274274                        break;
    275275                }
    276                
     276
    277277                /* write to the file */
    278278                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_WRITEDATA, theFile);
     
    281281                        break;
    282282                }
    283                
     283
    284284                /* we want/don't want progress */
    285285                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_NOPROGRESS, noprogress);
     
    295295                        break;
    296296                }
    297                
     297
    298298                /* we may want to ignore ssl errors */
    299299                if (ignoresslcert) {
     
    350350                (void) fclose( theFile );
    351351                theFile = NULL;
    352                
     352
    353353#if LIBCURL_VERSION_NUM == 0x070d01 /* work around broken Tiger version of cURL */
    354354                if (remotetime) {
     
    357357                        char buf[BUFSIZ];
    358358                        size_t size;
    359                        
     359
    360360                        tmp = tmpnam(NULL);
    361361                        fp = fopen(tmp, "w");
     
    399399                        }
    400400                }
    401                
     401
    402402                /* free header memory */
    403403                curl_slist_free_all(headers);
     
    410410                                0);
    411411                }
    412                
     412
    413413                /* clean up */
    414414                curl_easy_cleanup( theHandle );
     
    451451                long theModDate;
    452452                long userModDate;
    453                                
    454                 /*      first (second) parameter is the url,
    455                         second (third) parameter is the date */
     453
     454                /* first (second) parameter is the url, second (third) parameter is the date */
    456455                if (objc != 4) {
    457456                        Tcl_WrongNumArgs(interp, 1, objv, "isnewer url date");
     
    468467                        break;
    469468                }
    470                
     469
    471470                /* Open the file (dev/null) */
    472471                theFile = fopen( "/dev/null", "a" );
     
    474473                        Tcl_SetResult(interp, strerror(errno), TCL_VOLATILE);
    475474                        theResult = TCL_ERROR;
    476                         break;
     475                        break;
    477476                }
    478477
    479478                /* Create the CURL handle */
    480479                theHandle = curl_easy_init();
    481                
     480
    482481                /* Setup the handle */
    483482                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_URL, theURL);
     
    486485                        break;
    487486                }
    488                
     487
    489488                /* -L option */
    490489                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_FOLLOWLOCATION, 1);
     
    535534                        break;
    536535                }
    537                
     536
    538537                /* save the modification date */
    539538                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_FILETIME, 1);
     
    561560                        break;
    562561                }
    563                
     562
    564563                /* actually fetch the resource */
    565564                theCurlCode = curl_easy_perform(theHandle);
     
    568567                        break;
    569568                }
    570                
     569
    571570                /* close the file */
    572571                (void) fclose( theFile );
    573572                theFile = NULL;
    574                
     573
    575574                /* check everything went fine */
    576575                theCurlCode = curl_easy_getinfo(theHandle, CURLINFO_HTTP_CODE, &theResponseCode);
     
    589588                                break;
    590589                        }
    591        
     590
    592591                        /* clean up */
    593592                        curl_easy_cleanup( theHandle );
    594593                        theHandle = NULL;
    595        
     594
    596595                        /* compare this with the date provided by user */
    597596                        if (theModDate < -1) {
     
    606605                } else {
    607606                        Tcl_SetResult(interp, "0", TCL_STATIC);
    608                 }               
    609     } while (0);
    610    
    611     if (theHandle != NULL) {
    612         curl_easy_cleanup( theHandle );
    613     }
    614     if (theFile != NULL) {
    615         fclose( theFile );
    616     }
    617    
     607                }
     608        } while (0);
     609
     610        if (theHandle != NULL) {
     611                curl_easy_cleanup(theHandle);
     612        }
     613
     614        if (theFile != NULL) {
     615                fclose(theFile);
     616        }
     617
    618618        return theResult;
    619619}
     
    638638                CURLcode theCurlCode;
    639639                double theFileSize;
    640                                
    641                 /*      first (second) parameter is the url */
     640
     641                /* first (second) parameter is the url */
    642642                if (objc != 3) {
    643643                        Tcl_WrongNumArgs(interp, 1, objv, "getsize url");
     
    654654                        Tcl_SetResult(interp, strerror(errno), TCL_VOLATILE);
    655655                        theResult = TCL_ERROR;
    656                         break;
     656                        break;
    657657                }
    658658
    659659                /* Create the CURL handle */
    660660                theHandle = curl_easy_init();
    661                
     661
    662662                /* Setup the handle */
    663663                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_URL, theURL);
     
    666666                        break;
    667667                }
    668                
     668
    669669                /* -L option */
    670670                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_FOLLOWLOCATION, 1);
     
    722722                        break;
    723723                }
    724                
     724
    725725                /* skip the body data */
    726726                theCurlCode = curl_easy_setopt(theHandle, CURLOPT_NOBODY, 1);
     
    736736                        break;
    737737                }
    738                
     738
    739739                /* actually fetch the resource */
    740740                theCurlCode = curl_easy_perform(theHandle);
     
    743743                        break;
    744744                }
    745                
     745
    746746                /* close the file */
    747747                (void) fclose( theFile );
     
    756756                        break;
    757757                }
    758        
     758
    759759                /* clean up */
    760760                curl_easy_cleanup( theHandle );
     
    764764                        "%.0f", theFileSize);
    765765                Tcl_SetResult(interp, theSizeString, TCL_VOLATILE);
    766     } while (0);
    767    
    768     if (theHandle != NULL) {
    769         curl_easy_cleanup( theHandle );
    770     }
    771     if (theFile != NULL) {
    772         fclose( theFile );
    773     }
    774    
     766        } while (0);
     767
     768        if (theHandle != NULL) {
     769                curl_easy_cleanup(theHandle);
     770        }
     771
     772        if (theFile != NULL) {
     773                fclose(theFile);
     774        }
     775
    775776        return theResult;
    776777}
     
    788789                ClientData clientData UNUSED,
    789790                Tcl_Interp* interp,
    790                 int objc, 
     791                int objc,
    791792                Tcl_Obj* CONST objv[])
    792793{
    793     typedef enum {
    794         kCurlFetch,
    795         kCurlIsNewer,
    796         kCurlGetSize
    797     } EOption;
    798    
     794        typedef enum {
     795                kCurlFetch,
     796                kCurlIsNewer,
     797                kCurlGetSize
     798        } EOption;
     799
    799800        static const char *options[] = {
    800801                "fetch", "isnewer", "getsize", NULL
    801802        };
    802803        int theResult = TCL_OK;
    803     EOption theOptionIndex;
     804        EOption theOptionIndex;
    804805        static pthread_once_t once = PTHREAD_ONCE_INIT;
    805806
Note: See TracChangeset for help on using the changeset viewer.