Return to tool.c CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / libaitsync / src

Annotation of libaitsync/src/tool.c, revision 1.3

1.1       misho       1: /*************************************************************************
                      2: * (C) 2010 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
                      3: *  by Michael Pounov <misho@openbsd-bg.org>
                      4: *
                      5: * $Author: misho $
1.3     ! misho       6: * $Id: tool.c,v 1.2.2.2 2012/07/22 22:09:18 misho Exp $
1.1       misho       7: *
1.2       misho       8: **************************************************************************
                      9: The ELWIX and AITNET software is distributed under the following
                     10: terms:
                     11: 
                     12: All of the documentation and software included in the ELWIX and AITNET
                     13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
                     14: 
1.3     ! misho      15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
1.2       misho      16:        by Michael Pounov <misho@elwix.org>.  All rights reserved.
                     17: 
                     18: Redistribution and use in source and binary forms, with or without
                     19: modification, are permitted provided that the following conditions
                     20: are met:
                     21: 1. Redistributions of source code must retain the above copyright
                     22:    notice, this list of conditions and the following disclaimer.
                     23: 2. Redistributions in binary form must reproduce the above copyright
                     24:    notice, this list of conditions and the following disclaimer in the
                     25:    documentation and/or other materials provided with the distribution.
                     26: 3. All advertising materials mentioning features or use of this software
                     27:    must display the following acknowledgement:
                     28: This product includes software developed by Michael Pounov <misho@elwix.org>
                     29: ELWIX - Embedded LightWeight unIX and its contributors.
                     30: 4. Neither the name of AITNET nor the names of its contributors
                     31:    may be used to endorse or promote products derived from this software
                     32:    without specific prior written permission.
                     33: 
                     34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
                     35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     37: ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     44: SUCH DAMAGE.
                     45: */
1.1       misho      46: #include "global.h"
                     47: #include "tool.h"
                     48: 
                     49: 
                     50: /*
                     51:  * sync_mksig() Make signature from chunk
                     52:  * @id = chunk id
                     53:  * @off = file offset
                     54:  * @buf = chunk buffer for calculate signature
                     55:  * @buflen = buffer length in bytes
                     56:  * @sc = Chunk structure for fill
                     57: */
1.3     ! misho      58: inline void
        !            59: sync_mksig(int id, off_t off, u_char * __restrict buf, int buflen, sync_chunk_t * __restrict sc)
1.1       misho      60: {
                     61:        MD5_CTX ctx;
                     62: 
                     63:        MD5_Init(&ctx);
                     64:        memset(sc, 0, sizeof(sync_chunk_t));
                     65:        sc->sc_magic = DLTSYNC_MAGIC;
                     66:        sc->sc_id = id;
                     67:        sc->sc_off = off;
                     68:        sc->sc_len = buflen;
                     69:        sc->sc_roll = crcAdler(buf, buflen);
                     70:        MD5_Update(&ctx, buf, buflen);
                     71:        MD5_Final(sc->sc_cksum, &ctx);
                     72: }
                     73: 
                     74: /*
                     75:  * syncWriteNum() Write to handle converted number to bigendian
                     76:  * @f = handle
                     77:  * @ulNum = number to convert
                     78:  * @nNumLen = length of number to bytes
                     79:  * return: -1 error, != -1 writed bytes to handle
                     80: */
1.3     ! misho      81: inline int
        !            82: syncWriteNum(int f, u_long ulNum, int nNumLen)
1.1       misho      83: {
                     84:        u_char buf[sizeof ulNum];
                     85:        register int i;
                     86: 
                     87:        if (nNumLen < 1 || nNumLen > ULONG_MAX) {
                     88:                syncSetErr(-1, "Illegal number len %d\n", nNumLen);
                     89:                return -1;
                     90:        }
                     91: 
                     92:        for (i = nNumLen - 1; i; i--) {
                     93:                buf[i] = (u_char) ulNum;
                     94:                ulNum >>= 8;
                     95:        }
                     96: 
                     97:        return write(f, buf, nNumLen);
                     98: }
1.2       misho      99: 
                    100: #ifndef HAVE_MKSTEMPS
1.3     ! misho     101: /* API function missing in NetBSD base source tree!!! */
1.2       misho     102: #define TEMPCHARS       "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
                    103: #define NUM_CHARS       (sizeof(TEMPCHARS) - 1)
                    104: 
                    105: int
                    106: mkstemps(char *path, int slen)
                    107: {
                    108:        char *start, *cp, *ep;
                    109:        const char *tempchars = TEMPCHARS;
                    110:        unsigned int tries = 1;
                    111:        size_t len;
                    112:        int fd;
                    113: 
                    114:        assert(path);
                    115:        len = strlen(path);
                    116:        if (len == 0 || slen >= len) {
                    117:                errno = EINVAL;
                    118:                goto end;
                    119:        } else
                    120:                ep = path + len - slen;
                    121: 
                    122:        for (start = ep; start > path && start[-1] == 'X'; start--) {
                    123:                if (tries < INT_MAX / NUM_CHARS)
                    124:                        tries *= NUM_CHARS;
                    125:        }
                    126:        tries *= 2;
                    127: 
                    128:        do {
                    129:                for (cp = start; cp != ep; cp++)
                    130:                        *cp = tempchars[arc4random_uniform(NUM_CHARS)];
                    131: 
                    132:                fd = open(path, O_CREAT | O_EXCL | O_RDWR, S_IRUSR | S_IWUSR);
                    133:                if (fd != -1 || errno != EEXIST)
                    134:                        return fd;
                    135:        } while (--tries);
                    136: 
                    137:        errno = EEXIST;
                    138: end:
                    139:        return -1;
                    140: }
                    141: #endif