github.com/razvanm/vanadium-go-1.3@v0.0.0-20160721203343-4a65068e5915/src/cmd/8l/list.c (about)

     1  // Inferno utils/8l/list.c
     2  // http://code.google.com/p/inferno-os/source/browse/utils/8l/list.c
     3  //
     4  //	Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
     5  //	Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net)
     6  //	Portions Copyright © 1997-1999 Vita Nuova Limited
     7  //	Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuova.com)
     8  //	Portions Copyright © 2004,2006 Bruce Ellis
     9  //	Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net)
    10  //	Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others
    11  //	Portions Copyright © 2009 The Go Authors.  All rights reserved.
    12  //
    13  // Permission is hereby granted, free of charge, to any person obtaining a copy
    14  // of this software and associated documentation files (the "Software"), to deal
    15  // in the Software without restriction, including without limitation the rights
    16  // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
    17  // copies of the Software, and to permit persons to whom the Software is
    18  // furnished to do so, subject to the following conditions:
    19  //
    20  // The above copyright notice and this permission notice shall be included in
    21  // all copies or substantial portions of the Software.
    22  //
    23  // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
    24  // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
    25  // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
    26  // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
    27  // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
    28  // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
    29  // THE SOFTWARE.
    30  
    31  // Printing.
    32  
    33  #include	"l.h"
    34  #include	"../ld/lib.h"
    35  
    36  void
    37  listinit(void)
    38  {
    39  	listinit8();
    40  	fmtinstall('I', Iconv);
    41  }
    42  
    43  int
    44  Iconv(Fmt *fp)
    45  {
    46  	int i, n;
    47  	uchar *p;
    48  	char *s;
    49  	Fmt fmt;
    50  	
    51  	n = fp->prec;
    52  	fp->prec = 0;
    53  	if(!(fp->flags&FmtPrec) || n < 0)
    54  		return fmtstrcpy(fp, "%I");
    55  	fp->flags &= ~FmtPrec;
    56  	p = va_arg(fp->args, uchar*);
    57  
    58  	// format into temporary buffer and
    59  	// call fmtstrcpy to handle padding.
    60  	fmtstrinit(&fmt);
    61  	for(i=0; i<n; i++)
    62  		fmtprint(&fmt, "%.2ux", *p++);
    63  	s = fmtstrflush(&fmt);
    64  	fmtstrcpy(fp, s);
    65  	free(s);
    66  	return 0;
    67  }