Return to util2.c CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / rsync

Annotation of embedaddon/rsync/util2.c, revision 1.1.1.3

1.1       misho       1: /*
                      2:  * Utility routines used in rsync.
                      3:  *
                      4:  * Copyright (C) 1996-2000 Andrew Tridgell
                      5:  * Copyright (C) 1996 Paul Mackerras
                      6:  * Copyright (C) 2001, 2002 Martin Pool <mbp@samba.org>
1.1.1.3 ! misho       7:  * Copyright (C) 2003-2020 Wayne Davison
1.1       misho       8:  *
                      9:  * This program is free software; you can redistribute it and/or modify
                     10:  * it under the terms of the GNU General Public License as published by
                     11:  * the Free Software Foundation; either version 3 of the License, or
                     12:  * (at your option) any later version.
                     13:  *
                     14:  * This program is distributed in the hope that it will be useful,
                     15:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
                     16:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
                     17:  * GNU General Public License for more details.
                     18:  *
                     19:  * You should have received a copy of the GNU General Public License along
                     20:  * with this program; if not, visit the http://fsf.org website.
                     21:  */
                     22: 
                     23: #include "rsync.h"
                     24: #include "itypes.h"
                     25: #include "inums.h"
                     26: 
1.1.1.3 ! misho      27: extern size_t max_alloc;
        !            28: 
        !            29: char *do_calloc = "42";
1.1       misho      30: 
                     31: /**
                     32:  * Sleep for a specified number of milliseconds.
                     33:  *
1.1.1.3 ! misho      34:  * Always returns True.
1.1       misho      35:  **/
                     36: int msleep(int t)
                     37: {
1.1.1.3 ! misho      38: #ifdef HAVE_NANOSLEEP
        !            39:        struct timespec ts;
        !            40: 
        !            41:        ts.tv_sec = t / 1000;
        !            42:        ts.tv_nsec = (t % 1000) * 1000000L;
        !            43: 
        !            44:        while (nanosleep(&ts, &ts) < 0 && errno == EINTR) {}
        !            45: 
        !            46: #elif defined HAVE_USLEEP
1.1.1.2   misho      47:        usleep(t*1000);
1.1.1.3 ! misho      48: 
1.1.1.2   misho      49: #else
1.1       misho      50:        int tdiff = 0;
                     51:        struct timeval tval, t1, t2;
                     52: 
                     53:        gettimeofday(&t1, NULL);
                     54: 
                     55:        while (tdiff < t) {
                     56:                tval.tv_sec = (t-tdiff)/1000;
                     57:                tval.tv_usec = 1000*((t-tdiff)%1000);
                     58: 
                     59:                errno = 0;
                     60:                select(0,NULL,NULL, NULL, &tval);
                     61: 
                     62:                gettimeofday(&t2, NULL);
                     63:                tdiff = (t2.tv_sec - t1.tv_sec)*1000 +
                     64:                        (t2.tv_usec - t1.tv_usec)/1000;
1.1.1.2   misho      65:                if (tdiff < 0)
                     66:                        t1 = t2; /* Time went backwards, so start over. */
1.1       misho      67:        }
1.1.1.2   misho      68: #endif
1.1       misho      69: 
                     70:        return True;
                     71: }
                     72: 
1.1.1.3 ! misho      73: void *my_alloc(void *ptr, size_t num, size_t size, const char *file, int line)
1.1       misho      74: {
1.1.1.3 ! misho      75:        if (max_alloc && num >= max_alloc/size) {
        !            76:                if (!file)
        !            77:                        return NULL;
        !            78:                rprintf(FERROR, "[%s] exceeded --max-alloc=%s setting (file=%s, line=%d)\n",
        !            79:                        who_am_i(), do_big_num(max_alloc, 0, NULL), src_file(file), line);
        !            80:                exit_cleanup(RERR_MALLOC);
        !            81:        }
1.1       misho      82:        if (!ptr)
1.1.1.3 ! misho      83:                ptr = malloc(num * size);
        !            84:        else if (ptr == do_calloc)
        !            85:                ptr = calloc(num, size);
        !            86:        else
        !            87:                ptr = realloc(ptr, num * size);
        !            88:        if (!ptr && file)
        !            89:                _out_of_memory("my_alloc caller", file, line);
        !            90:        return ptr;
1.1       misho      91: }
                     92: 
1.1.1.3 ! misho      93: const char *sum_as_hex(int csum_type, const char *sum, int flist_csum)
1.1       misho      94: {
                     95:        static char buf[MAX_DIGEST_LEN*2+1];
                     96:        int i, x1, x2;
1.1.1.3 ! misho      97:        int canonical = canonical_checksum(csum_type);
        !            98:        int sum_len = csum_len_for_type(csum_type, flist_csum);
        !            99:        char *c;
1.1       misho     100: 
1.1.1.3 ! misho     101:        if (!canonical)
        !           102:                return NULL;
1.1       misho     103: 
1.1.1.3 ! misho     104:        assert(sum_len*2 < (int)sizeof buf);
1.1       misho     105: 
1.1.1.3 ! misho     106:        for (i = sum_len, c = buf; --i >= 0; ) {
        !           107:                int ndx = canonical < 0 ? sum_len - i - 1 : i;
        !           108:                x2 = CVAL(sum, ndx);
        !           109:                x1 = x2 >> 4;
        !           110:                x2 &= 0xF;
        !           111:                *c++ = x1 <= 9 ? x1 + '0' : x1 + 'a' - 10;
        !           112:                *c++ = x2 <= 9 ? x2 + '0' : x2 + 'a' - 10;
1.1       misho     113:        }
                    114: 
1.1.1.3 ! misho     115:        *c = '\0';
        !           116: 
1.1       misho     117:        return buf;
                    118: }
                    119: 
1.1.1.3 ! misho     120: NORETURN void _out_of_memory(const char *msg, const char *file, int line)
1.1       misho     121: {
1.1.1.3 ! misho     122:        rprintf(FERROR, "[%s] out of memory: %s (file=%s, line=%d)\n", who_am_i(), msg, src_file(file), line);
1.1       misho     123:        exit_cleanup(RERR_MALLOC);
                    124: }
                    125: 
1.1.1.3 ! misho     126: NORETURN void _overflow_exit(const char *msg, const char *file, int line)
1.1       misho     127: {
1.1.1.3 ! misho     128:        rprintf(FERROR, "[%s] buffer overflow: %s (file=%s, line=%d)\n", who_am_i(), msg, src_file(file), line);
1.1       misho     129:        exit_cleanup(RERR_MALLOC);
                    130: }
1.1.1.3 ! misho     131: 
        !           132: const char *src_file(const char *file)
        !           133: {
        !           134:        static const char *util2 = __FILE__;
        !           135:        static int prefix = -1;
        !           136: 
        !           137:        if (prefix < 0) {
        !           138:                const char *cp = strrchr(util2, '/');
        !           139:                prefix = cp ? cp - util2 + 1 : 0;
        !           140:        }
        !           141: 
        !           142:        if (prefix && strncmp(file, util2, prefix) == 0)
        !           143:                return file + prefix;
        !           144:        return file;
        !           145: }