home *** CD-ROM | disk | FTP | other *** search
/ Big Green CD 8 / BGCD_8_Dev.iso / NEXTSTEP / UNIX / Shells / zsh-3.0.5-MIHS / src / Src / rlimits.awk < prev    next >
Encoding:
AWK Script  |  1997-09-25  |  2.4 KB  |  75 lines
  1. # 
  2. # $Id$
  3. #
  4. # rlimits.awk: {g,n}awk script to generate rlimits.h
  5. # rewritten by Peter Stephenson <pws@ifh.de> from Geoff Wing
  6. # <mason@werple.apana.org.au>'s signames.awk
  7. # NB: On SunOS 4.1.3 - user-functions don't work properly, also \" problems
  8. # Without 0 + hacks some nawks compare numbers as strings
  9. #
  10. BEGIN {limidx = 0}
  11.  
  12. /^[\t ]*(#[\t ]*define[\t _]*RLIMIT_[A-Z]*[\t ]*[0-9][0-9]*|RLIMIT_[A-Z]*,[\t ]*)/ {
  13.     limindex = index($0, "RLIMIT_")
  14.     limtail = substr($0, limindex, 80)
  15.     split(limtail, tmp)
  16.     limnam = substr(tmp[1], 8, 20)
  17.     limnum = tmp[2]
  18.     # in this case I assume GNU libc resourcebits.h
  19.     if (limnum == "") {
  20.     limnum = limidx++
  21.     sub (",", "", limnam)
  22.     }
  23.     limrev[limnam] = limnum
  24.     if (lim[limnum] == "") {
  25.     lim[limnum] = limnam
  26.     if (limnum ~ /^[0-9]*$/) {
  27.         if (limnam == "MEMLOCK") { msg[limnum] = "memorylocked" }
  28.         if (limnam == "RSS")     { msg[limnum] = "resident" }
  29.         if (limnam == "VMEM")    { msg[limnum] = "vmemorysize" }
  30.         if (limnam == "NOFILE")  { msg[limnum] = "descriptors" }
  31.         if (limnam == "OFILE")   { msg[limnum] = "descriptors" }
  32.         if (limnam == "CORE")    { msg[limnum] = "coredumpsize" }
  33.         if (limnam == "STACK")   { msg[limnum] = "stacksize" }
  34.         if (limnam == "DATA")    { msg[limnum] = "datasize" }
  35.         if (limnam == "FSIZE")   { msg[limnum] = "filesize" }
  36.         if (limnam == "CPU")     { msg[limnum] = "cputime" }
  37.         if (limnam == "NPROC")   { msg[limnum] = "maxproc" }
  38.         if (limnam == "AS")      { msg[limnum] = "addressspace" }
  39.         if (limnam == "TCACHE")  { msg[limnum] = "cachedthreads" }
  40.         }
  41.     }
  42. }
  43. /^[\t ]*#[\t ]*define[\t _]*RLIM_NLIMITS[\t ]*[0-9][0-9]*/ {
  44.     limindex = index($0, "RLIM_")
  45.     limtail = substr($0, limindex, 80)
  46.     split(limtail, tmp)
  47.     nlimits = tmp[2]
  48. }
  49. # in case of GNU libc
  50. /^[\t ]*RLIM_NLIMITS[\t ]*=[\t ]*RLIMIT_NLIMITS/ {
  51.     nlimits = limidx
  52. }
  53.  
  54. END {
  55.     if (limrev["MEMLOCK"] != "") {
  56.         irss = limrev["RSS"]
  57.         msg[irss] = "memoryuse"
  58.     }
  59.     ps = "%s"
  60.  
  61.     printf("%s\n%s\n\n", "/** rlimits.h                                 **/", "/** architecture-customized limits for zsh **/")
  62.     printf("#define ZSH_NLIMITS %d\n\nstatic char *recs[ZSH_NLIMITS+1] = {\n", 0 + nlimits)
  63.  
  64.     for (i = 0; i < 0 + nlimits; i++)
  65.     if (msg[i] == "") {
  66.             badlimit++
  67.             printf("\t%c%s%c,\n", 034, lim[i], 034)
  68.     } else
  69.         printf("\t%c%s%c,\n", 034, msg[i], 034)
  70.     print "\tNULL"
  71.     print "};"
  72.     print ""
  73.     exit(badlimit)
  74. }
  75.