Return to tool.c CVS log

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

version 2.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.6 2014/02/04 16:58:17 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 - 2014
   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:  *
   53:  * @id = chunk id
   54:  * @off = file offset
   55:  * @buf = chunk buffer for calculate signature
   56:  * @buflen = buffer length in bytes
   57:  * @sc = Chunk structure for fill
   58: */
   59: void
   60: sync_mksig(int id, off_t off, u_char * __restrict buf, int buflen, sync_chunk_t * __restrict sc)
   61: {
   62: 	MD5_CTX ctx;
   63: 
   64: 	MD5_Init(&ctx);
   65: 	memset(sc, 0, sizeof(sync_chunk_t));
   66: 	sc->sc_magic = DLTSYNC_MAGIC;
   67: 	sc->sc_id = id;
   68: 	sc->sc_off = off;
   69: 	sc->sc_len = buflen;
   70: 	sc->sc_roll = crcAdler(buf, buflen);
   71: 	MD5_Update(&ctx, buf, buflen);
   72: 	MD5_Final(sc->sc_cksum, &ctx);
   73: }
   74: 
   75: #if 0
   76: /*
   77:  * sync_WriteNum() - Write to handle converted number to bigendian
   78:  *
   79:  * @f = handle
   80:  * @ulNum = number to convert
   81:  * @nNumLen = length of number to bytes
   82:  * return: -1 error, != -1 writed bytes to handle
   83: */
   84: int
   85: sync_WriteNum(int f, u_long ulNum, int nNumLen)
   86: {
   87: 	u_char buf[sizeof ulNum];
   88: 	register int i;
   89: 
   90: 	if (nNumLen < 1 || nNumLen > ULONG_MAX) {
   91: 		sync_SetErr(-1, "Illegal number len %d\n", nNumLen);
   92: 		return -1;
   93: 	}
   94: 
   95: 	for (i = nNumLen - 1; i; i--) {
   96: 		buf[i] = (u_char) ulNum;
   97: 		ulNum >>= 8;
   98: 	}
   99: 
  100: 	return write(f, buf, nNumLen);
  101: }
  102: #endif
  103: 
  104: #ifndef HAVE_MKSTEMPS
  105: /* API function missing in NetBSD base source tree!!! */
  106: #define TEMPCHARS       "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
  107: #define NUM_CHARS       (sizeof(TEMPCHARS) - 1)
  108: 
  109: int
  110: mkstemps(char *path, int slen)
  111: {
  112: 	char *start, *cp, *ep;
  113: 	const char *tempchars = TEMPCHARS;
  114: 	unsigned int tries = 1;
  115: 	size_t len;
  116: 	int fd;
  117: 
  118: 	assert(path);
  119: 	len = strlen(path);
  120: 	if (len == 0 || slen >= len) {
  121: 		errno = EINVAL;
  122: 		goto end;
  123: 	} else
  124: 		ep = path + len - slen;
  125: 
  126: 	for (start = ep; start > path && start[-1] == 'X'; start--) {
  127: 		if (tries < INT_MAX / NUM_CHARS)
  128: 			tries *= NUM_CHARS;
  129: 	}
  130: 	tries *= 2;
  131: 
  132: 	do {
  133: 		for (cp = start; cp != ep; cp++)
  134: 			*cp = tempchars[arc4random_uniform(NUM_CHARS)];
  135: 
  136: 		fd = open(path, O_CREAT | O_EXCL | O_RDWR, S_IRUSR | S_IWUSR);
  137: 		if (fd != -1 || errno != EEXIST)
  138: 			return fd;
  139: 	} while (--tries);
  140: 
  141: 	errno = EEXIST;
  142: end:
  143: 	return -1;
  144: }
  145: #endif