Annotation of embedaddon/curl/tests/libtest/lib537.c, revision 1.1

1.1     ! misho       1: /***************************************************************************
        !             2:  *                                  _   _ ____  _
        !             3:  *  Project                     ___| | | |  _ \| |
        !             4:  *                             / __| | | | |_) | |
        !             5:  *                            | (__| |_| |  _ <| |___
        !             6:  *                             \___|\___/|_| \_\_____|
        !             7:  *
        !             8:  * Copyright (C) 1998 - 2018, Daniel Stenberg, <daniel@haxx.se>, et al.
        !             9:  *
        !            10:  * This software is licensed as described in the file COPYING, which
        !            11:  * you should have received as part of this distribution. The terms
        !            12:  * are also available at https://curl.haxx.se/docs/copyright.html.
        !            13:  *
        !            14:  * You may opt to use, copy, modify, merge, publish, distribute and/or sell
        !            15:  * copies of the Software, and permit persons to whom the Software is
        !            16:  * furnished to do so, under the terms of the COPYING file.
        !            17:  *
        !            18:  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
        !            19:  * KIND, either express or implied.
        !            20:  *
        !            21:  ***************************************************************************/
        !            22: #include "test.h"
        !            23: 
        !            24: #ifdef HAVE_SYS_RESOURCE_H
        !            25: #include <sys/resource.h>
        !            26: #endif
        !            27: #ifdef HAVE_FCNTL_H
        !            28: #include <fcntl.h>
        !            29: #endif
        !            30: #include <limits.h>
        !            31: 
        !            32: #include "warnless.h"
        !            33: #include "memdebug.h"
        !            34: 
        !            35: #if !defined(HAVE_POLL_FINE)    && \
        !            36:     !defined(USE_WINSOCK)       && \
        !            37:     !defined(TPF)               && \
        !            38:     !defined(FD_SETSIZE)
        !            39: #error "this test requires FD_SETSIZE"
        !            40: #endif
        !            41: 
        !            42: #define SAFETY_MARGIN (11)
        !            43: 
        !            44: #if defined(WIN32) || defined(_WIN32) || defined(MSDOS)
        !            45: #define DEV_NULL "NUL"
        !            46: #else
        !            47: #define DEV_NULL "/dev/null"
        !            48: #endif
        !            49: 
        !            50: #if defined(HAVE_GETRLIMIT) && defined(HAVE_SETRLIMIT)
        !            51: 
        !            52: static int *fd = NULL;
        !            53: static struct rlimit num_open;
        !            54: static char msgbuff[256];
        !            55: 
        !            56: static void store_errmsg(const char *msg, int err)
        !            57: {
        !            58:   if(!err)
        !            59:     msnprintf(msgbuff, sizeof(msgbuff), "%s", msg);
        !            60:   else
        !            61:     msnprintf(msgbuff, sizeof(msgbuff), "%s, errno %d, %s", msg, err,
        !            62:               strerror(err));
        !            63: }
        !            64: 
        !            65: static void close_file_descriptors(void)
        !            66: {
        !            67:   for(num_open.rlim_cur = 0;
        !            68:       num_open.rlim_cur < num_open.rlim_max;
        !            69:       num_open.rlim_cur++)
        !            70:     if(fd[num_open.rlim_cur] > 0)
        !            71:       close(fd[num_open.rlim_cur]);
        !            72:   free(fd);
        !            73:   fd = NULL;
        !            74: }
        !            75: 
        !            76: static int fopen_works(void)
        !            77: {
        !            78:   FILE *fpa[3];
        !            79:   int i;
        !            80:   int ret = 1;
        !            81: 
        !            82:   for(i = 0; i < 3; i++) {
        !            83:     fpa[i] = NULL;
        !            84:   }
        !            85:   for(i = 0; i < 3; i++) {
        !            86:     fpa[i] = fopen(DEV_NULL, FOPEN_READTEXT);
        !            87:     if(fpa[i] == NULL) {
        !            88:       store_errmsg("fopen failed", errno);
        !            89:       fprintf(stderr, "%s\n", msgbuff);
        !            90:       ret = 0;
        !            91:       break;
        !            92:     }
        !            93:   }
        !            94:   for(i = 0; i < 3; i++) {
        !            95:     if(fpa[i] != NULL)
        !            96:       fclose(fpa[i]);
        !            97:   }
        !            98:   return ret;
        !            99: }
        !           100: 
        !           101: static int rlimit(int keep_open)
        !           102: {
        !           103:   int *tmpfd;
        !           104:   rlim_t nitems, i;
        !           105:   int *memchunk = NULL;
        !           106:   char *fmt;
        !           107:   struct rlimit rl;
        !           108:   char strbuff[256];
        !           109:   char strbuff1[81];
        !           110:   char fmt_u[] = "%u";
        !           111:   char fmt_lu[] = "%lu";
        !           112: #ifdef HAVE_LONGLONG
        !           113:   char fmt_llu[] = "%llu";
        !           114: 
        !           115:   if(sizeof(rl.rlim_max) > sizeof(long))
        !           116:     fmt = fmt_llu;
        !           117:   else
        !           118: #endif
        !           119:     fmt = (sizeof(rl.rlim_max) < sizeof(long))?fmt_u:fmt_lu;
        !           120: 
        !           121:   /* get initial open file limits */
        !           122: 
        !           123:   if(getrlimit(RLIMIT_NOFILE, &rl) != 0) {
        !           124:     store_errmsg("getrlimit() failed", errno);
        !           125:     fprintf(stderr, "%s\n", msgbuff);
        !           126:     return -1;
        !           127:   }
        !           128: 
        !           129:   /* show initial open file limits */
        !           130: 
        !           131: #ifdef RLIM_INFINITY
        !           132:   if(rl.rlim_cur == RLIM_INFINITY)
        !           133:     strcpy(strbuff, "INFINITY");
        !           134:   else
        !           135: #endif
        !           136:     msnprintf(strbuff, sizeof(strbuff), fmt, rl.rlim_cur);
        !           137:   fprintf(stderr, "initial soft limit: %s\n", strbuff);
        !           138: 
        !           139: #ifdef RLIM_INFINITY
        !           140:   if(rl.rlim_max == RLIM_INFINITY)
        !           141:     strcpy(strbuff, "INFINITY");
        !           142:   else
        !           143: #endif
        !           144:     msnprintf(strbuff, sizeof(strbuff), fmt, rl.rlim_max);
        !           145:   fprintf(stderr, "initial hard limit: %s\n", strbuff);
        !           146: 
        !           147:   /*
        !           148:    * if soft limit and hard limit are different we ask the
        !           149:    * system to raise soft limit all the way up to the hard
        !           150:    * limit. Due to some other system limit the soft limit
        !           151:    * might not be raised up to the hard limit. So from this
        !           152:    * point the resulting soft limit is our limit. Trying to
        !           153:    * open more than soft limit file descriptors will fail.
        !           154:    */
        !           155: 
        !           156:   if(rl.rlim_cur != rl.rlim_max) {
        !           157: 
        !           158: #ifdef OPEN_MAX
        !           159:     if((rl.rlim_cur > 0) &&
        !           160:         (rl.rlim_cur < OPEN_MAX)) {
        !           161:       fprintf(stderr, "raising soft limit up to OPEN_MAX\n");
        !           162:       rl.rlim_cur = OPEN_MAX;
        !           163:       if(setrlimit(RLIMIT_NOFILE, &rl) != 0) {
        !           164:         /* on failure don't abort just issue a warning */
        !           165:         store_errmsg("setrlimit() failed", errno);
        !           166:         fprintf(stderr, "%s\n", msgbuff);
        !           167:         msgbuff[0] = '\0';
        !           168:       }
        !           169:     }
        !           170: #endif
        !           171: 
        !           172:     fprintf(stderr, "raising soft limit up to hard limit\n");
        !           173:     rl.rlim_cur = rl.rlim_max;
        !           174:     if(setrlimit(RLIMIT_NOFILE, &rl) != 0) {
        !           175:       /* on failure don't abort just issue a warning */
        !           176:       store_errmsg("setrlimit() failed", errno);
        !           177:       fprintf(stderr, "%s\n", msgbuff);
        !           178:       msgbuff[0] = '\0';
        !           179:     }
        !           180: 
        !           181:     /* get current open file limits */
        !           182: 
        !           183:     if(getrlimit(RLIMIT_NOFILE, &rl) != 0) {
        !           184:       store_errmsg("getrlimit() failed", errno);
        !           185:       fprintf(stderr, "%s\n", msgbuff);
        !           186:       return -3;
        !           187:     }
        !           188: 
        !           189:     /* show current open file limits */
        !           190: 
        !           191: #ifdef RLIM_INFINITY
        !           192:     if(rl.rlim_cur == RLIM_INFINITY)
        !           193:       strcpy(strbuff, "INFINITY");
        !           194:     else
        !           195: #endif
        !           196:       msnprintf(strbuff, sizeof(strbuff), fmt, rl.rlim_cur);
        !           197:     fprintf(stderr, "current soft limit: %s\n", strbuff);
        !           198: 
        !           199: #ifdef RLIM_INFINITY
        !           200:     if(rl.rlim_max == RLIM_INFINITY)
        !           201:       strcpy(strbuff, "INFINITY");
        !           202:     else
        !           203: #endif
        !           204:       msnprintf(strbuff, sizeof(strbuff), fmt, rl.rlim_max);
        !           205:     fprintf(stderr, "current hard limit: %s\n", strbuff);
        !           206: 
        !           207:   } /* (rl.rlim_cur != rl.rlim_max) */
        !           208: 
        !           209:   /*
        !           210:    * test 537 is all about testing libcurl functionality
        !           211:    * when the system has nearly exhausted the number of
        !           212:    * available file descriptors. Test 537 will try to run
        !           213:    * with a very small number of file descriptors available.
        !           214:    * This implies that any file descriptor which is open
        !           215:    * when the test runs will have a number in the high range
        !           216:    * of whatever the system supports.
        !           217:    */
        !           218: 
        !           219:   /*
        !           220:    * reserve a chunk of memory before opening file descriptors to
        !           221:    * avoid a low memory condition once the file descriptors are
        !           222:    * open. System conditions that could make the test fail should
        !           223:    * be addressed in the precheck phase. This chunk of memory shall
        !           224:    * be always free()ed before exiting the rlimit() function so
        !           225:    * that it becomes available to the test.
        !           226:    */
        !           227: 
        !           228:   for(nitems = i = 1; nitems <= i; i *= 2)
        !           229:     nitems = i;
        !           230:   if(nitems > 0x7fff)
        !           231:     nitems = 0x40000;
        !           232:   do {
        !           233:     num_open.rlim_max = sizeof(*memchunk) * nitems;
        !           234:     msnprintf(strbuff, sizeof(strbuff), fmt, num_open.rlim_max);
        !           235:     fprintf(stderr, "allocating memchunk %s byte array\n", strbuff);
        !           236:     memchunk = malloc(sizeof(*memchunk) * (size_t)nitems);
        !           237:     if(!memchunk) {
        !           238:       fprintf(stderr, "memchunk, malloc() failed\n");
        !           239:       nitems /= 2;
        !           240:     }
        !           241:   } while(nitems && !memchunk);
        !           242:   if(!memchunk) {
        !           243:     store_errmsg("memchunk, malloc() failed", errno);
        !           244:     fprintf(stderr, "%s\n", msgbuff);
        !           245:     return -4;
        !           246:   }
        !           247: 
        !           248:   /* initialize it to fight lazy allocation */
        !           249: 
        !           250:   fprintf(stderr, "initializing memchunk array\n");
        !           251: 
        !           252:   for(i = 0; i < nitems; i++)
        !           253:     memchunk[i] = -1;
        !           254: 
        !           255:   /* set the number of file descriptors we will try to open */
        !           256: 
        !           257: #ifdef RLIM_INFINITY
        !           258:   if((rl.rlim_cur > 0) && (rl.rlim_cur != RLIM_INFINITY)) {
        !           259: #else
        !           260:   if(rl.rlim_cur > 0) {
        !           261: #endif
        !           262:     /* soft limit minus SAFETY_MARGIN */
        !           263:     num_open.rlim_max = rl.rlim_cur - SAFETY_MARGIN;
        !           264:   }
        !           265:   else {
        !           266:     /* a huge number of file descriptors */
        !           267:     for(nitems = i = 1; nitems <= i; i *= 2)
        !           268:       nitems = i;
        !           269:     if(nitems > 0x7fff)
        !           270:       nitems = 0x40000;
        !           271:     num_open.rlim_max = nitems;
        !           272:   }
        !           273: 
        !           274:   /* verify that we won't overflow size_t in malloc() */
        !           275: 
        !           276:   if((size_t)(num_open.rlim_max) > ((size_t)-1) / sizeof(*fd)) {
        !           277:     msnprintf(strbuff1, sizeof(strbuff1), fmt, num_open.rlim_max);
        !           278:     msnprintf(strbuff, sizeof(strbuff), "unable to allocate an array for %s "
        !           279:               "file descriptors, would overflow size_t", strbuff1);
        !           280:     store_errmsg(strbuff, 0);
        !           281:     fprintf(stderr, "%s\n", msgbuff);
        !           282:     free(memchunk);
        !           283:     return -5;
        !           284:   }
        !           285: 
        !           286:   /* allocate array for file descriptors */
        !           287: 
        !           288:   do {
        !           289:     msnprintf(strbuff, sizeof(strbuff), fmt, num_open.rlim_max);
        !           290:     fprintf(stderr, "allocating array for %s file descriptors\n", strbuff);
        !           291:     fd = malloc(sizeof(*fd) * (size_t)(num_open.rlim_max));
        !           292:     if(!fd) {
        !           293:       fprintf(stderr, "fd, malloc() failed\n");
        !           294:       num_open.rlim_max /= 2;
        !           295:     }
        !           296:   } while(num_open.rlim_max && !fd);
        !           297:   if(!fd) {
        !           298:     store_errmsg("fd, malloc() failed", errno);
        !           299:     fprintf(stderr, "%s\n", msgbuff);
        !           300:     free(memchunk);
        !           301:     return -6;
        !           302:   }
        !           303: 
        !           304:   /* initialize it to fight lazy allocation */
        !           305: 
        !           306:   fprintf(stderr, "initializing fd array\n");
        !           307: 
        !           308:   for(num_open.rlim_cur = 0;
        !           309:       num_open.rlim_cur < num_open.rlim_max;
        !           310:       num_open.rlim_cur++)
        !           311:     fd[num_open.rlim_cur] = -1;
        !           312: 
        !           313:   msnprintf(strbuff, sizeof(strbuff), fmt, num_open.rlim_max);
        !           314:   fprintf(stderr, "trying to open %s file descriptors\n", strbuff);
        !           315: 
        !           316:   /* open a dummy descriptor */
        !           317: 
        !           318:   fd[0] = open(DEV_NULL, O_RDONLY);
        !           319:   if(fd[0] < 0) {
        !           320:     msnprintf(strbuff, sizeof(strbuff), "opening of %s failed", DEV_NULL);
        !           321:     store_errmsg(strbuff, errno);
        !           322:     fprintf(stderr, "%s\n", msgbuff);
        !           323:     free(fd);
        !           324:     fd = NULL;
        !           325:     free(memchunk);
        !           326:     return -7;
        !           327:   }
        !           328: 
        !           329:   /* create a bunch of file descriptors */
        !           330: 
        !           331:   for(num_open.rlim_cur = 1;
        !           332:       num_open.rlim_cur < num_open.rlim_max;
        !           333:       num_open.rlim_cur++) {
        !           334: 
        !           335:     fd[num_open.rlim_cur] = dup(fd[0]);
        !           336: 
        !           337:     if(fd[num_open.rlim_cur] < 0) {
        !           338: 
        !           339:       fd[num_open.rlim_cur] = -1;
        !           340: 
        !           341:       msnprintf(strbuff1, sizeof(strbuff1), fmt, num_open.rlim_cur);
        !           342:       msnprintf(strbuff, sizeof(strbuff), "dup() attempt %s failed", strbuff1);
        !           343:       fprintf(stderr, "%s\n", strbuff);
        !           344: 
        !           345:       msnprintf(strbuff1, sizeof(strbuff1), fmt, num_open.rlim_cur);
        !           346:       msnprintf(strbuff, sizeof(strbuff), "fds system limit seems close to %s",
        !           347:                 strbuff1);
        !           348:       fprintf(stderr, "%s\n", strbuff);
        !           349: 
        !           350:       num_open.rlim_max = num_open.rlim_cur - SAFETY_MARGIN;
        !           351: 
        !           352:       num_open.rlim_cur -= num_open.rlim_max;
        !           353:       msnprintf(strbuff1, sizeof(strbuff1), fmt, num_open.rlim_cur);
        !           354:       msnprintf(strbuff, sizeof(strbuff), "closing %s file descriptors",
        !           355:                 strbuff1);
        !           356:       fprintf(stderr, "%s\n", strbuff);
        !           357: 
        !           358:       for(num_open.rlim_cur = num_open.rlim_max;
        !           359:           fd[num_open.rlim_cur] >= 0;
        !           360:           num_open.rlim_cur++) {
        !           361:         close(fd[num_open.rlim_cur]);
        !           362:         fd[num_open.rlim_cur] = -1;
        !           363:       }
        !           364: 
        !           365:       msnprintf(strbuff, sizeof(strbuff), fmt, num_open.rlim_max);
        !           366:       fprintf(stderr, "shrinking array for %s file descriptors\n", strbuff);
        !           367: 
        !           368:       /* we don't care if we can't shrink it */
        !           369: 
        !           370:       tmpfd = realloc(fd, sizeof(*fd) * (size_t)(num_open.rlim_max));
        !           371:       if(tmpfd) {
        !           372:         fd = tmpfd;
        !           373:         tmpfd = NULL;
        !           374:       }
        !           375: 
        !           376:       break;
        !           377: 
        !           378:     }
        !           379: 
        !           380:   }
        !           381: 
        !           382:   msnprintf(strbuff, sizeof(strbuff), fmt, num_open.rlim_max);
        !           383:   fprintf(stderr, "%s file descriptors open\n", strbuff);
        !           384: 
        !           385: #if !defined(HAVE_POLL_FINE)    && \
        !           386:     !defined(USE_WINSOCK)       && \
        !           387:     !defined(TPF)
        !           388: 
        !           389:   /*
        !           390:    * when using select() instead of poll() we cannot test
        !           391:    * libcurl functionality with a socket number equal or
        !           392:    * greater than FD_SETSIZE. In any case, macro VERIFY_SOCK
        !           393:    * in lib/select.c enforces this check and protects libcurl
        !           394:    * from a possible crash. The effect of this protection
        !           395:    * is that test 537 will always fail, since the actual
        !           396:    * call to select() never takes place. We skip test 537
        !           397:    * with an indication that select limit would be exceeded.
        !           398:    */
        !           399: 
        !           400:   num_open.rlim_cur = FD_SETSIZE - SAFETY_MARGIN;
        !           401:   if(num_open.rlim_max > num_open.rlim_cur) {
        !           402:     msnprintf(strbuff, sizeof(strbuff), "select limit is FD_SETSIZE %d",
        !           403:               FD_SETSIZE);
        !           404:     store_errmsg(strbuff, 0);
        !           405:     fprintf(stderr, "%s\n", msgbuff);
        !           406:     close_file_descriptors();
        !           407:     free(memchunk);
        !           408:     return -8;
        !           409:   }
        !           410: 
        !           411:   num_open.rlim_cur = FD_SETSIZE - SAFETY_MARGIN;
        !           412:   for(rl.rlim_cur = 0;
        !           413:       rl.rlim_cur < num_open.rlim_max;
        !           414:       rl.rlim_cur++) {
        !           415:     if((fd[rl.rlim_cur] > 0) &&
        !           416:        ((unsigned int)fd[rl.rlim_cur] > num_open.rlim_cur)) {
        !           417:       msnprintf(strbuff, sizeof(strbuff), "select limit is FD_SETSIZE %d",
        !           418:                 FD_SETSIZE);
        !           419:       store_errmsg(strbuff, 0);
        !           420:       fprintf(stderr, "%s\n", msgbuff);
        !           421:       close_file_descriptors();
        !           422:       free(memchunk);
        !           423:       return -9;
        !           424:     }
        !           425:   }
        !           426: 
        !           427: #endif /* using a FD_SETSIZE bound select() */
        !           428: 
        !           429:   /*
        !           430:    * Old or 'backwards compatible' implementations of stdio do not allow
        !           431:    * handling of streams with an underlying file descriptor number greater
        !           432:    * than 255, even when allowing high numbered file descriptors for sockets.
        !           433:    * At this point we have a big number of file descriptors which have been
        !           434:    * opened using dup(), so lets test the stdio implementation and discover
        !           435:    * if it is capable of fopen()ing some additional files.
        !           436:    */
        !           437: 
        !           438:   if(!fopen_works()) {
        !           439:     msnprintf(strbuff1, sizeof(strbuff1), fmt, num_open.rlim_max);
        !           440:     msnprintf(strbuff, sizeof(strbuff), "fopen fails with %s fds open",
        !           441:               strbuff1);
        !           442:     fprintf(stderr, "%s\n", msgbuff);
        !           443:     msnprintf(strbuff, sizeof(strbuff), "fopen fails with lots of fds open");
        !           444:     store_errmsg(strbuff, 0);
        !           445:     close_file_descriptors();
        !           446:     free(memchunk);
        !           447:     return -10;
        !           448:   }
        !           449: 
        !           450:   /* free the chunk of memory we were reserving so that it
        !           451:      becomes becomes available to the test */
        !           452: 
        !           453:   free(memchunk);
        !           454: 
        !           455:   /* close file descriptors unless instructed to keep them */
        !           456: 
        !           457:   if(!keep_open) {
        !           458:     close_file_descriptors();
        !           459:   }
        !           460: 
        !           461:   return 0;
        !           462: }
        !           463: 
        !           464: int test(char *URL)
        !           465: {
        !           466:   CURLcode res;
        !           467:   CURL *curl;
        !           468: 
        !           469:   if(!strcmp(URL, "check")) {
        !           470:     /* used by the test script to ask if we can run this test or not */
        !           471:     if(rlimit(FALSE)) {
        !           472:       fprintf(stdout, "rlimit problem: %s\n", msgbuff);
        !           473:       return 1;
        !           474:     }
        !           475:     return 0; /* sure, run this! */
        !           476:   }
        !           477: 
        !           478:   if(rlimit(TRUE)) {
        !           479:     /* failure */
        !           480:     return TEST_ERR_MAJOR_BAD;
        !           481:   }
        !           482: 
        !           483:   /* run the test with the bunch of open file descriptors
        !           484:      and close them all once the test is over */
        !           485: 
        !           486:   if(curl_global_init(CURL_GLOBAL_ALL) != CURLE_OK) {
        !           487:     fprintf(stderr, "curl_global_init() failed\n");
        !           488:     close_file_descriptors();
        !           489:     return TEST_ERR_MAJOR_BAD;
        !           490:   }
        !           491: 
        !           492:   curl = curl_easy_init();
        !           493:   if(!curl) {
        !           494:     fprintf(stderr, "curl_easy_init() failed\n");
        !           495:     close_file_descriptors();
        !           496:     curl_global_cleanup();
        !           497:     return TEST_ERR_MAJOR_BAD;
        !           498:   }
        !           499: 
        !           500:   test_setopt(curl, CURLOPT_URL, URL);
        !           501:   test_setopt(curl, CURLOPT_HEADER, 1L);
        !           502: 
        !           503:   res = curl_easy_perform(curl);
        !           504: 
        !           505: test_cleanup:
        !           506: 
        !           507:   close_file_descriptors();
        !           508:   curl_easy_cleanup(curl);
        !           509:   curl_global_cleanup();
        !           510: 
        !           511:   return (int)res;
        !           512: }
        !           513: 
        !           514: #else /* defined(HAVE_GETRLIMIT) && defined(HAVE_SETRLIMIT) */
        !           515: 
        !           516: int test(char *URL)
        !           517: {
        !           518:   (void)URL;
        !           519:   printf("system lacks necessary system function(s)");
        !           520:   return 1; /* skip test */
        !           521: }
        !           522: 
        !           523: #endif /* defined(HAVE_GETRLIMIT) && defined(HAVE_SETRLIMIT) */

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>