Return to tool.c CVS log

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

version 1.1

    1: /*************************************************************************
    2: * (C) 2010 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
    3: *  by Michael Pounov <misho@openbsd-bg.org>
    4: *
    5: * $Author: misho $
    6: * $Id: tool.c,v 1.3 2012/07/22 22:09:47 misho Exp $
    7: *
    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: 
   15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
   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: */
   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: */
   58: inline void
   59: sync_mksig(int id, off_t off, u_char * __restrict buf, int buflen, sync_chunk_t * __restrict sc)
   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: */
   81: inline int
   82: syncWriteNum(int f, u_long ulNum, int nNumLen)
   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: }
   99: 
  100: #ifndef HAVE_MKSTEMPS
  101: /* API function missing in NetBSD base source tree!!! */
  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