less verbose...

[unix-history] / usr / src / usr.bin / window / wwalloc.c

/*
* Copyright (c) 1983 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice and this paragraph are
* duplicated in all such forms and that any documentation,
* advertising materials, and other materials related to such
* distribution and use acknowledge that the software was developed
* by the University of California, Berkeley.  The name of the
* University may not be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*/

#ifndef lint
static char sccsid[] = "@(#)wwalloc.c   3.9 (Berkeley) %G%";
#endif /* not lint */

#include "ww.h"

char **
wwalloc(row, col, nrow, ncol, size)
{
       register char *p, **pp;
       register int i;

       /* fast, call malloc only once */
       pp = (char **)
               malloc((unsigned) sizeof (char **) * nrow + size * nrow * ncol);
       if (pp == 0) {
               wwerrno = WWE_NOMEM;
               return 0;
       }
       p = (char *)&pp[nrow];
       col *= size;
       size /= sizeof (char);          /* paranoid */
       size *= ncol;
       for (i = 0; i < nrow; i++) {
               pp[i] = p - col;
               p += size;
       }
       return pp - row;
}

wwfree(p, row)
register char **p;
{
       free((char *)(p + row));
}