X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=scripts%2Fdebian%2Fftpstats.R;h=84786df44cd965e07a3fd917e15ed5033e7234be;hb=e4f91a34d430bec975530dba154aa4afd6ea316d;hp=62846c766c0e6780019208e5d06c96bfd9f2496a;hpb=f06f23ab8165af6e231f3262b81d32a44c3a7639;p=dak.git diff --git a/scripts/debian/ftpstats.R b/scripts/debian/ftpstats.R index 62846c76..84786df4 100644 --- a/scripts/debian/ftpstats.R +++ b/scripts/debian/ftpstats.R @@ -1,8 +1,7 @@ arch <- c("source", "all", "amd64", "i386", "alpha", "arm", "armel", "hppa", "hurd-i386", "ia64", - "mips", "mipsel", "powerpc", "s390", "sparc") -palette(c("midnightblue", "gold", "turquoise", "cyan", "black", "red", "OrangeRed", "green3", "blue", - "magenta", "tomato4", - "violetred2","thistle4", "steelblue2", "springgreen4", + "kfreebsd-amd64", "kfreebsd-i386", "mips", "mipsel", "powerpc", "s390", "sparc") +palette(c("midnightblue", "gold", "turquoise", "cyan", "black", "red", "OrangeRed", "green3", "blue", "magenta", + "cornsilk3", "darkolivegreen3", "tomato4", "violetred2","thistle4", "steelblue2", "springgreen4", "salmon","gray")) cname <- c("date",arch) plotsize <- function(file,title,p,height=11.8,width=16.9) { @@ -12,9 +11,9 @@ plotsize <- function(file,title,p,height=11.8,width=16.9) { legend(par("usr")[1]+xinch(5),par("usr")[4]-yinch(0.1),legend=colnames(t), ncol=3,fill=1:15,xjust=1,yjust=1) } -t <- (read.table("/org/ftp.debian.org/misc/ftpstats.data",sep=",",header=0,row.names=1,col.names=cname))/1024/1024 +t <- (read.table("/srv/ftp-master.debian.org/misc/ftpstats.data",sep=",",header=0,row.names=1,col.names=cname))/1024/1024 v <- t[(length(t$all)-90):(length(t$all)),1:15] #plotsize("/org/ftp.debian.org/web/size.png","Daily dinstall run size by arch",t) -plotsize("/org/ftp.debian.org/web/size-quarter.png","Daily dinstall run size by arch (past quarter)",v) +plotsize("/srv/ftp.debian.org/web/size-quarter.png","Daily dinstall run size by arch (past quarter)",v)