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.2.2.1 2011/05/10 21:02:46 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
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
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>