quot.c revision 41727
112032Speter/* 212032Speter * Copyright (C) 1991, 1994 Wolfgang Solfrank. 312032Speter * Copyright (C) 1991, 1994 TooLs GmbH. 412032Speter * All rights reserved. 512032Speter * 612032Speter * Redistribution and use in source and binary forms, with or without 712032Speter * modification, are permitted provided that the following conditions 812032Speter * are met: 912032Speter * 1. Redistributions of source code must retain the above copyright 1012032Speter * notice, this list of conditions and the following disclaimer. 1112032Speter * 2. Redistributions in binary form must reproduce the above copyright 1212032Speter * notice, this list of conditions and the following disclaimer in the 1312032Speter * documentation and/or other materials provided with the distribution. 1412032Speter * 3. All advertising materials mentioning features or use of this software 1512032Speter * must display the following acknowledgement: 1612032Speter * This product includes software developed by TooLs GmbH. 1712032Speter * 4. The name of TooLs GmbH may not be used to endorse or promote products 1812032Speter * derived from this software without specific prior written permission. 1912032Speter * 2012032Speter * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR 2112032Speter * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 2212032Speter * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 2312032Speter * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 2412032Speter * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 2512032Speter * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; 2612032Speter * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 2712032Speter * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 2812032Speter * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 2912032Speter * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 3012032Speter */ 3112032Speter 3212032Speter#ifndef lint 3330262Scharnierstatic const char rcsid[] = 3441727Sdillon "$Id: quot.c,v 1.8 1998/01/17 16:45:03 bde Exp $"; 3512032Speter#endif /* not lint */ 3612032Speter 3712032Speter#include <sys/param.h> 3812032Speter#include <sys/mount.h> 3912032Speter#include <sys/time.h> 4012032Speter#include <ufs/ffs/fs.h> 4112032Speter#include <ufs/ufs/quota.h> 4212032Speter#include <ufs/ufs/inode.h> 4312032Speter 4430262Scharnier#include <err.h> 4530262Scharnier#include <fcntl.h> 4630262Scharnier#include <errno.h> 4730262Scharnier#include <pwd.h> 4812032Speter#include <stdio.h> 4912032Speter#include <stdlib.h> 5012032Speter#include <string.h> 5130262Scharnier#include <unistd.h> 5212032Speter 5312032Speter/* some flags of what to do: */ 5412032Speterstatic char estimate; 5512032Speterstatic char count; 5612032Speterstatic char unused; 5730262Scharnierstatic void (*func)(); 5812032Speterstatic long blocksize; 5912032Speterstatic char *header; 6012032Speterstatic int headerlen; 6112032Speter 6212032Speter/* 6312032Speter * Original BSD quot doesn't round to number of frags/blocks, 6412032Speter * doesn't account for indirection blocks and gets it totally 6512032Speter * wrong if the size is a multiple of the blocksize. 6612032Speter * The new code always counts the number of 512 byte blocks 6712032Speter * instead of the number of kilobytes and converts them to 6812032Speter * kByte when done (on request). 6941727Sdillon * 7041727Sdillon * Due to the size of modern disks, we must cast intermediate 7141727Sdillon * values to 64 bits to prevent potential overflows. 7212032Speter */ 7312032Speter#ifdef COMPAT 7412032Speter#define SIZE(n) (n) 7512032Speter#else 7641727Sdillon#define SIZE(n) ((int)(((quad_t)(n) * 512 + blocksize - 1)/blocksize)) 7712032Speter#endif 7812032Speter 7912032Speter#define INOCNT(fs) ((fs)->fs_ipg) 8012032Speter#define INOSZ(fs) (sizeof(struct dinode) * INOCNT(fs)) 8112032Speter 8230262Scharnierstatic struct dinode * 8330262Scharnierget_inode(fd,super,ino) 8412032Speter struct fs *super; 8512032Speter ino_t ino; 8612032Speter{ 8712032Speter static struct dinode *ip; 8812032Speter static ino_t last; 8912032Speter 9012032Speter if (fd < 0) { /* flush cache */ 9112032Speter if (ip) { 9212032Speter free(ip); 9312032Speter ip = 0; 9412032Speter } 9512032Speter return 0; 9612032Speter } 9712032Speter 9812032Speter if (!ip || ino < last || ino >= last + INOCNT(super)) { 9912032Speter if (!ip 10030262Scharnier && !(ip = (struct dinode *)malloc(INOSZ(super)))) 10130262Scharnier errx(1, "allocate inodes"); 10212032Speter last = (ino / INOCNT(super)) * INOCNT(super); 10328160Sjkh if (lseek(fd, (off_t)ino_to_fsba(super, last) << super->fs_fshift, 0) < (off_t)0 10430262Scharnier || read(fd,ip,INOSZ(super)) != INOSZ(super)) 10530262Scharnier err(1, "read inodes"); 10612032Speter } 10712032Speter 10812032Speter return ip + ino % INOCNT(super); 10912032Speter} 11012032Speter 11112032Speter#ifdef COMPAT 11212032Speter#define actualblocks(super,ip) ((ip)->di_blocks/2) 11312032Speter#else 11412032Speter#define actualblocks(super,ip) ((ip)->di_blocks) 11512032Speter#endif 11612032Speter 11730262Scharnierstatic int virtualblocks(super,ip) 11812032Speter struct fs *super; 11912032Speter struct dinode *ip; 12012032Speter{ 12112032Speter register off_t nblk, sz; 12212032Speter 12312032Speter sz = ip->di_size; 12412032Speter#ifdef COMPAT 12512032Speter if (lblkno(super,sz) >= NDADDR) { 12612032Speter nblk = blkroundup(super,sz); 12712032Speter if (sz == nblk) 12812032Speter nblk += super->fs_bsize; 12912032Speter } 13012032Speter 13112032Speter return sz / 1024; 13212032Speter 13312032Speter#else /* COMPAT */ 13412032Speter 13512032Speter if (lblkno(super,sz) >= NDADDR) { 13612032Speter nblk = blkroundup(super,sz); 13712032Speter sz = lblkno(super,nblk); 13812032Speter sz = (sz - NDADDR + NINDIR(super) - 1) / NINDIR(super); 13912032Speter while (sz > 0) { 14012032Speter nblk += sz * super->fs_bsize; 14112032Speter /* sz - 1 rounded up */ 14212032Speter sz = (sz - 1 + NINDIR(super) - 1) / NINDIR(super); 14312032Speter } 14412032Speter } else 14512032Speter nblk = fragroundup(super,sz); 14612032Speter 14712032Speter return nblk / 512; 14812032Speter#endif /* COMPAT */ 14912032Speter} 15012032Speter 15130262Scharnierstatic int 15230262Scharnierisfree(ip) 15312032Speter struct dinode *ip; 15412032Speter{ 15512032Speter#ifdef COMPAT 15612032Speter return (ip->di_mode&IFMT) == 0; 15712032Speter#else /* COMPAT */ 15812032Speter 15912032Speter switch (ip->di_mode&IFMT) { 16012032Speter case IFIFO: 16112032Speter case IFLNK: /* should check FASTSYMLINK? */ 16212032Speter case IFDIR: 16312032Speter case IFREG: 16412032Speter return 0; 16512032Speter default: 16612032Speter return 1; 16712032Speter } 16812032Speter#endif 16912032Speter} 17012032Speter 17112032Speterstatic struct user { 17212032Speter uid_t uid; 17312032Speter char *name; 17412032Speter daddr_t space; 17512032Speter long count; 17612032Speter daddr_t spc30; 17712032Speter daddr_t spc60; 17812032Speter daddr_t spc90; 17912032Speter} *users; 18012032Speterstatic int nusers; 18112032Speter 18230262Scharnierstatic void 18330262Scharnierinituser() 18412032Speter{ 18512032Speter register i; 18612032Speter register struct user *usr; 18712032Speter 18812032Speter if (!nusers) { 18912032Speter nusers = 8; 19012032Speter if (!(users = 19130262Scharnier (struct user *)calloc(nusers,sizeof(struct user)))) 19230262Scharnier errx(1, "allocate users"); 19312032Speter } else { 19412032Speter for (usr = users, i = nusers; --i >= 0; usr++) { 19512032Speter usr->space = usr->spc30 = usr->spc60 = usr->spc90 = 0; 19612032Speter usr->count = 0; 19712032Speter } 19812032Speter } 19912032Speter} 20012032Speter 20130262Scharnierstatic void 20230262Scharnierusrrehash() 20312032Speter{ 20412032Speter register i; 20512032Speter register struct user *usr, *usrn; 20612032Speter struct user *svusr; 20712032Speter 20812032Speter svusr = users; 20912032Speter nusers <<= 1; 21030262Scharnier if (!(users = (struct user *)calloc(nusers,sizeof(struct user)))) 21130262Scharnier errx(1, "allocate users"); 21212032Speter for (usr = svusr, i = nusers >> 1; --i >= 0; usr++) { 21312032Speter for (usrn = users + (usr->uid&(nusers - 1)); usrn->name; 21412032Speter usrn--) { 21512032Speter if (usrn <= users) 21612032Speter usrn = users + nusers; 21712032Speter } 21812032Speter *usrn = *usr; 21912032Speter } 22012032Speter} 22112032Speter 22230262Scharnierstatic struct user * 22330262Scharnieruser(uid) 22412032Speter uid_t uid; 22512032Speter{ 22612032Speter register struct user *usr; 22712032Speter register i; 22812032Speter struct passwd *pwd; 22912032Speter 23012032Speter while (1) { 23112032Speter for (usr = users + (uid&(nusers - 1)), i = nusers; --i >= 0; 23212032Speter usr--) { 23312032Speter if (!usr->name) { 23412032Speter usr->uid = uid; 23512032Speter 23612032Speter if (!(pwd = getpwuid(uid))) { 23730262Scharnier if ((usr->name = (char *)malloc(7))) 23812032Speter sprintf(usr->name,"#%d",uid); 23912032Speter } else { 24030262Scharnier if ((usr->name = (char *) 24130262Scharnier malloc(strlen(pwd->pw_name) + 1))) 24212032Speter strcpy(usr->name,pwd->pw_name); 24312032Speter } 24430262Scharnier if (!usr->name) 24530262Scharnier errx(1, "allocate users"); 24612032Speter 24712032Speter return usr; 24812032Speter 24912032Speter } else if (usr->uid == uid) 25012032Speter return usr; 25112032Speter 25212032Speter if (usr <= users) 25312032Speter usr = users + nusers; 25412032Speter } 25512032Speter usrrehash(); 25612032Speter } 25712032Speter} 25812032Speter 25930262Scharnierstatic int 26030262Scharniercmpusers(u1,u2) 26112032Speter struct user *u1, *u2; 26212032Speter{ 26312032Speter return u2->space - u1->space; 26412032Speter} 26512032Speter 26612032Speter#define sortusers(users) (qsort((users),nusers,sizeof(struct user), \ 26712032Speter cmpusers)) 26812032Speter 26930262Scharnierstatic void 27030262Scharnieruses(uid,blks,act) 27112032Speter uid_t uid; 27212032Speter daddr_t blks; 27312032Speter time_t act; 27412032Speter{ 27512032Speter static time_t today; 27612032Speter register struct user *usr; 27712032Speter 27812032Speter if (!today) 27912032Speter time(&today); 28012032Speter 28112032Speter usr = user(uid); 28212032Speter usr->count++; 28312032Speter usr->space += blks; 28412032Speter 28512032Speter if (today - act > 90L * 24L * 60L * 60L) 28612032Speter usr->spc90 += blks; 28712032Speter if (today - act > 60L * 24L * 60L * 60L) 28812032Speter usr->spc60 += blks; 28912032Speter if (today - act > 30L * 24L * 60L * 60L) 29012032Speter usr->spc30 += blks; 29112032Speter} 29212032Speter 29312032Speter#ifdef COMPAT 29412032Speter#define FSZCNT 500 29512032Speter#else 29612032Speter#define FSZCNT 512 29712032Speter#endif 29812032Speterstruct fsizes { 29912032Speter struct fsizes *fsz_next; 30012032Speter daddr_t fsz_first, fsz_last; 30112032Speter ino_t fsz_count[FSZCNT]; 30212032Speter daddr_t fsz_sz[FSZCNT]; 30312032Speter} *fsizes; 30412032Speter 30530262Scharnierstatic void 30630262Scharnierinitfsizes() 30712032Speter{ 30812032Speter register struct fsizes *fp; 30912032Speter register i; 31012032Speter 31112032Speter for (fp = fsizes; fp; fp = fp->fsz_next) { 31212032Speter for (i = FSZCNT; --i >= 0;) { 31312032Speter fp->fsz_count[i] = 0; 31412032Speter fp->fsz_sz[i] = 0; 31512032Speter } 31612032Speter } 31712032Speter} 31812032Speter 31930262Scharnierstatic void 32030262Scharnierdofsizes(fd,super,name) 32112032Speter struct fs *super; 32212032Speter char *name; 32312032Speter{ 32412032Speter ino_t inode, maxino; 32512032Speter struct dinode *ip; 32612032Speter daddr_t sz, ksz; 32712032Speter struct fsizes *fp, **fsp; 32812032Speter register i; 32912032Speter 33012032Speter maxino = super->fs_ncg * super->fs_ipg - 1; 33112032Speter#ifdef COMPAT 33230262Scharnier if (!(fsizes = (struct fsizes *)malloc(sizeof(struct fsizes)))) 33330262Scharnier errx(1, "alloc fsize structure"); 33412032Speter#endif /* COMPAT */ 33512032Speter for (inode = 0; inode < maxino; inode++) { 33612032Speter errno = 0; 33712032Speter if ((ip = get_inode(fd,super,inode)) 33812032Speter#ifdef COMPAT 33912032Speter && ((ip->di_mode&IFMT) == IFREG 34012032Speter || (ip->di_mode&IFMT) == IFDIR) 34112032Speter#else /* COMPAT */ 34212032Speter && !isfree(ip) 34312032Speter#endif /* COMPAT */ 34412032Speter ) { 34512032Speter sz = estimate ? virtualblocks(super,ip) : 34612032Speter actualblocks(super,ip); 34712032Speter#ifdef COMPAT 34812032Speter if (sz >= FSZCNT) { 34912032Speter fsizes->fsz_count[FSZCNT-1]++; 35012032Speter fsizes->fsz_sz[FSZCNT-1] += sz; 35112032Speter } else { 35212032Speter fsizes->fsz_count[sz]++; 35312032Speter fsizes->fsz_sz[sz] += sz; 35412032Speter } 35512032Speter#else /* COMPAT */ 35612032Speter ksz = SIZE(sz); 35730262Scharnier for (fsp = &fsizes; (fp = *fsp); fsp = &fp->fsz_next) { 35812032Speter if (ksz < fp->fsz_last) 35912032Speter break; 36012032Speter } 36112032Speter if (!fp || ksz < fp->fsz_first) { 36212032Speter if (!(fp = (struct fsizes *) 36330262Scharnier malloc(sizeof(struct fsizes)))) 36430262Scharnier errx(1, "alloc fsize structure"); 36512032Speter fp->fsz_next = *fsp; 36612032Speter *fsp = fp; 36712032Speter fp->fsz_first = (ksz / FSZCNT) * FSZCNT; 36812032Speter fp->fsz_last = fp->fsz_first + FSZCNT; 36912032Speter for (i = FSZCNT; --i >= 0;) { 37012032Speter fp->fsz_count[i] = 0; 37112032Speter fp->fsz_sz[i] = 0; 37212032Speter } 37312032Speter } 37412032Speter fp->fsz_count[ksz % FSZCNT]++; 37512032Speter fp->fsz_sz[ksz % FSZCNT] += sz; 37612032Speter#endif /* COMPAT */ 37712032Speter } else if (errno) { 37830262Scharnier err(1, "%s", name); 37912032Speter } 38012032Speter } 38112032Speter sz = 0; 38212032Speter for (fp = fsizes; fp; fp = fp->fsz_next) { 38312032Speter for (i = 0; i < FSZCNT; i++) { 38412032Speter if (fp->fsz_count[i]) 38512032Speter printf("%d\t%d\t%d\n",fp->fsz_first + i, 38612032Speter fp->fsz_count[i], 38712032Speter SIZE(sz += fp->fsz_sz[i])); 38812032Speter } 38912032Speter } 39012032Speter} 39112032Speter 39230262Scharnierstatic void 39330262Scharnierdouser(fd,super,name) 39412032Speter struct fs *super; 39512032Speter char *name; 39612032Speter{ 39712032Speter ino_t inode, maxino; 39812032Speter struct user *usr, *usrs; 39912032Speter struct dinode *ip; 40012032Speter register n; 40112032Speter 40212032Speter maxino = super->fs_ncg * super->fs_ipg - 1; 40312032Speter for (inode = 0; inode < maxino; inode++) { 40412032Speter errno = 0; 40512032Speter if ((ip = get_inode(fd,super,inode)) 40612032Speter && !isfree(ip)) 40712032Speter uses(ip->di_uid, 40812032Speter estimate ? virtualblocks(super,ip) : 40912032Speter actualblocks(super,ip), 41012032Speter ip->di_atime); 41112032Speter else if (errno) { 41230262Scharnier err(1, "%s", name); 41312032Speter } 41412032Speter } 41530262Scharnier if (!(usrs = (struct user *)malloc(nusers * sizeof(struct user)))) 41630262Scharnier errx(1, "allocate users"); 41712032Speter bcopy(users,usrs,nusers * sizeof(struct user)); 41812032Speter sortusers(usrs); 41912032Speter for (usr = usrs, n = nusers; --n >= 0 && usr->count; usr++) { 42012032Speter printf("%5d",SIZE(usr->space)); 42112032Speter if (count) 42212032Speter printf("\t%5d",usr->count); 42312032Speter printf("\t%-8s",usr->name); 42412032Speter if (unused) 42512032Speter printf("\t%5d\t%5d\t%5d", 42612032Speter SIZE(usr->spc30), 42712032Speter SIZE(usr->spc60), 42812032Speter SIZE(usr->spc90)); 42912032Speter printf("\n"); 43012032Speter } 43112032Speter free(usrs); 43212032Speter} 43312032Speter 43430262Scharnierstatic void 43530262Scharnierdonames(fd,super,name) 43612032Speter struct fs *super; 43712032Speter char *name; 43812032Speter{ 43912032Speter int c; 44012032Speter ino_t inode, inode1; 44112032Speter ino_t maxino; 44212032Speter struct dinode *ip; 44312032Speter 44412032Speter maxino = super->fs_ncg * super->fs_ipg - 1; 44512032Speter /* first skip the name of the filesystem */ 44612032Speter while ((c = getchar()) != EOF && (c < '0' || c > '9')) 44712032Speter while ((c = getchar()) != EOF && c != '\n'); 44812032Speter ungetc(c,stdin); 44912032Speter inode1 = -1; 45012032Speter while (scanf("%d",&inode) == 1) { 45112032Speter if (inode < 0 || inode > maxino) { 45230262Scharnier warnx("illegal inode %d",inode); 45312032Speter return; 45412032Speter } 45512032Speter errno = 0; 45612032Speter if ((ip = get_inode(fd,super,inode)) 45712032Speter && !isfree(ip)) { 45812032Speter printf("%s\t",user(ip->di_uid)->name); 45912032Speter /* now skip whitespace */ 46012032Speter while ((c = getchar()) == ' ' || c == '\t'); 46112032Speter /* and print out the remainder of the input line */ 46212032Speter while (c != EOF && c != '\n') { 46312032Speter putchar(c); 46412032Speter c = getchar(); 46512032Speter } 46612032Speter putchar('\n'); 46712032Speter inode1 = inode; 46812032Speter } else { 46912032Speter if (errno) { 47030262Scharnier err(1, "%s", name); 47112032Speter } 47212032Speter /* skip this line */ 47312032Speter while ((c = getchar()) != EOF && c != '\n'); 47412032Speter } 47512032Speter if (c == EOF) 47612032Speter break; 47712032Speter } 47812032Speter} 47912032Speter 48030262Scharnierstatic void 48130262Scharnierusage() 48212032Speter{ 48312032Speter#ifdef COMPAT 48430262Scharnier fprintf(stderr,"usage: quot [-nfcvha] [filesystem ...]\n"); 48512032Speter#else /* COMPAT */ 48630262Scharnier fprintf(stderr,"usage: quot [-acfhknv] [ filesystem ... ]\n"); 48712032Speter#endif /* COMPAT */ 48812032Speter exit(1); 48912032Speter} 49012032Speter 49112032Speterstatic char superblock[SBSIZE]; 49212032Speter 49330262Scharniervoid 49412032Speterquot(name,mp) 49512032Speter char *name, *mp; 49612032Speter{ 49712032Speter int fd; 49812032Speter 49912032Speter get_inode(-1); /* flush cache */ 50012032Speter inituser(); 50112032Speter initfsizes(); 50212032Speter if ((fd = open(name,0)) < 0 50312032Speter || lseek(fd,SBOFF,0) != SBOFF 50412032Speter || read(fd,superblock,SBSIZE) != SBSIZE) { 50530262Scharnier warn("%s", name); 50612032Speter close(fd); 50712032Speter return; 50812032Speter } 50912032Speter if (((struct fs *)superblock)->fs_magic != FS_MAGIC) { 51030262Scharnier warnx("%s: not a BSD filesystem",name); 51112032Speter close(fd); 51212032Speter return; 51312032Speter } 51412032Speter printf("%s:",name); 51512032Speter if (mp) 51612032Speter printf(" (%s)",mp); 51712032Speter putchar('\n'); 51812032Speter (*func)(fd,superblock,name); 51912032Speter close(fd); 52012032Speter} 52112032Speter 52230262Scharnierint 52330262Scharniermain(argc,argv) 52412032Speter char **argv; 52512032Speter{ 52612032Speter char all = 0; 52712032Speter struct statfs *mp; 52812032Speter char dev[MNAMELEN + 1]; 52912032Speter char *nm; 53012032Speter int cnt; 53112032Speter 53212032Speter func = douser; 53312032Speter#ifndef COMPAT 53412032Speter header = getbsize(&headerlen,&blocksize); 53512032Speter#endif 53612032Speter while (--argc > 0 && **++argv == '-') { 53712032Speter while (*++*argv) { 53812032Speter switch (**argv) { 53912032Speter case 'n': 54012032Speter func = donames; 54112032Speter break; 54212032Speter case 'c': 54312032Speter func = dofsizes; 54412032Speter break; 54512032Speter case 'a': 54612032Speter all = 1; 54712032Speter break; 54812032Speter case 'f': 54912032Speter count = 1; 55012032Speter break; 55112032Speter case 'h': 55212032Speter estimate = 1; 55312032Speter break; 55412032Speter#ifndef COMPAT 55512032Speter case 'k': 55612032Speter blocksize = 1024; 55712032Speter break; 55812032Speter#endif /* COMPAT */ 55912032Speter case 'v': 56012032Speter unused = 1; 56112032Speter break; 56212032Speter default: 56312032Speter usage(); 56412032Speter } 56512032Speter } 56612032Speter } 56712032Speter if (all) { 56812032Speter cnt = getmntinfo(&mp,MNT_NOWAIT); 56912032Speter for (; --cnt >= 0; mp++) { 57032595Sbde if (!strncmp(mp->f_fstypename, "ufs", MFSNAMELEN)) { 57130262Scharnier if ((nm = strrchr(mp->f_mntfromname,'/'))) { 57212032Speter sprintf(dev,"/dev/r%s",nm + 1); 57312032Speter nm = dev; 57412032Speter } else 57512032Speter nm = mp->f_mntfromname; 57612032Speter quot(nm,mp->f_mntonname); 57712032Speter } 57812032Speter } 57912032Speter } 58012032Speter while (--argc >= 0) 58112032Speter quot(*argv++,0); 58212032Speter return 0; 58312032Speter} 584