]> git.ipfire.org Git - thirdparty/mdadm.git/blobdiff - util.c
mdadm-1.6.0
[thirdparty/mdadm.git] / util.c
diff --git a/util.c b/util.c
index bd7f1d8fd5e992b5511cd2b91a5dc3004a5d90fc..2f4ad9638e71fd2c9ed757d0bd1cdc1d227ded81 100644 (file)
--- a/util.c
+++ b/util.c
@@ -1,7 +1,7 @@
 /*
- * mdctl - manage Linux "md" devices aka RAID arrays.
+ * mdadm - manage Linux "md" devices aka RAID arrays.
  *
- * Copyright (C) 2001 Neil Brown <neilb@cse.unsw.edu.au>
+ * Copyright (C) 2001-2002 Neil Brown <neilb@cse.unsw.edu.au>
  *
  *
  *    This program is free software; you can redistribute it and/or modify
  *           Australia
  */
 
-#include       "mdctl.h"
+#include       "mdadm.h"
 #include       "md_p.h"
 #include       <sys/utsname.h>
+#include       <ctype.h>
 
 /*
  * Parse a 128 bit uuid in 4 integers
@@ -56,8 +57,10 @@ int parse_uuid(char *str, int uuid[4])
            continue;
        else return 0;
 
-       uuid[hit/4] <<= 4;
-       uuid[hit/4] += n;
+       if (hit<32) {
+           uuid[hit/8] <<= 4;
+           uuid[hit/8] += n;
+       }
        hit++;
     }
     if (hit == 32)
@@ -88,10 +91,11 @@ int md_get_version(int fd)
        return -1;
 
     if (ioctl(fd, RAID_VERSION, &vers) == 0)
-       return  (vers.major<<16) | (vers.minor<<8) | vers.patchlevel;
-
+       return  (vers.major*10000) + (vers.minor*100) + vers.patchlevel;
+    if (errno == EACCES)
+           return -1;
     if (MAJOR(stb.st_rdev) == MD_MAJOR)
-       return (36<<8);
+       return (3600);
     return -1;
 }
 
@@ -99,18 +103,26 @@ int md_get_version(int fd)
 int get_linux_version()
 {
        struct utsname name;
+       char *cp;
        int a,b,c;
        if (uname(&name) <0)
                return -1;
 
-       if (sscanf(name.release, "%d.%d.%d", &a,&b,&c)!= 3)
-               return -1;
-       return (a<<16)+(b<<8)+c;
+       cp = name.release;
+       a = strtoul(cp, &cp, 10);
+       if (*cp != '.') return -1;
+       b = strtoul(cp+1, &cp, 10);
+       if (*cp != '.') return -1;
+       c = strtoul(cp+1, NULL, 10);
+
+       return (a*1000000)+(b*1000)+c;
 }
 
 int enough(int level, int raid_disks, int avail_disks)
 {
        switch (level) {
+       case -4:
+               return avail_disks>= 1;
        case -1:
        case 0:
                return avail_disks == raid_disks;
@@ -119,6 +131,8 @@ int enough(int level, int raid_disks, int avail_disks)
        case 4:
        case 5:
                return avail_disks >= raid_disks-1;
+       case 6:
+               return avail_disks >= raid_disks-2;
        default:
                return 0;
        }
@@ -195,8 +209,8 @@ int load_super(int fd, mdp_super_t *super)
         *   5 - no magic
         *   6 - wrong major version
         */
-       long size;
-       long long offset;
+       unsigned long size;
+       unsigned long long offset;
     
        if (ioctl(fd, BLKGETSIZE, &size))
                return 1;
@@ -208,10 +222,12 @@ int load_super(int fd, mdp_super_t *super)
 
        offset *= 512;
 
+       ioctl(fd, BLKFLSBUF, 0); /* make sure we read current data */
+
        if (lseek64(fd, offset, 0)< 0LL)
                return 3;
 
-       if (read(fd, &super, sizeof(super)) != sizeof(super))
+       if (read(fd, super, sizeof(*super)) != sizeof(*super))
                return 4;
 
        if (super->md_magic != MD_SB_MAGIC)
@@ -222,3 +238,386 @@ int load_super(int fd, mdp_super_t *super)
        return 0;
 }
 
+int store_super(int fd, mdp_super_t *super)
+{
+       long size;
+       long long offset;
+    
+       if (ioctl(fd, BLKGETSIZE, &size))
+               return 1;
+
+       if (size < MD_RESERVED_SECTORS*2)
+               return 2;
+       
+       offset = MD_NEW_SIZE_SECTORS(size);
+
+       offset *= 512;
+
+       if (lseek64(fd, offset, 0)< 0LL)
+               return 3;
+
+       if (write(fd, super, sizeof(*super)) != sizeof(*super))
+               return 4;
+
+       return 0;
+}
+    
+
+
+int check_ext2(int fd, char *name)
+{
+       /*
+        * Check for an ext2fs file system.
+        * Superblock is always 1K at 1K offset
+        *
+        * s_magic is le16 at 56 == 0xEF53
+        * report mtime - le32 at 44
+        * blocks - le32 at 4
+        * logblksize - le32 at 24
+        */
+       unsigned char sb[1024];
+       time_t mtime;
+       int size, bsize;
+       if (lseek(fd, 1024,0)!= 1024)
+               return 0;
+       if (read(fd, sb, 1024)!= 1024)
+               return 0;
+       if (sb[56] != 0x53 || sb[57] != 0xef)
+               return 0;
+
+       mtime = sb[44]|(sb[45]|(sb[46]|sb[47]<<8)<<8)<<8;
+       bsize = sb[24]|(sb[25]|(sb[26]|sb[27]<<8)<<8)<<8;
+       size = sb[4]|(sb[5]|(sb[6]|sb[7]<<8)<<8)<<8;
+       fprintf(stderr, Name ": %s appears to contain an ext2fs file system\n",
+               name);
+       fprintf(stderr,"    size=%dK  mtime=%s",
+               size*(1<<bsize), ctime(&mtime));
+       return 1;
+}
+
+int check_reiser(int fd, char *name)
+{
+       /*
+        * superblock is at 64K
+        * size is 1024;
+        * Magic string "ReIsErFs" or "ReIsEr2Fs" at 52
+        *
+        */
+       unsigned char sb[1024];
+       int size;
+       if (lseek(fd, 64*1024, 0) != 64*1024)
+               return 0;
+       if (read(fd, sb, 1024) != 1024)
+               return 0;
+       if (strncmp(sb+52, "ReIsErFs",8)!=0 &&
+           strncmp(sb+52, "ReIsEr2Fs",9)!=0)
+               return 0;
+       fprintf(stderr, Name ": %s appears to contain a reiserfs file system\n",name);
+       size = sb[0]|(sb[1]|(sb[2]|sb[3]<<8)<<8)<<8;
+       fprintf(stderr, "    size = %dK\n", size*4);
+               
+       return 1;
+}
+
+int check_raid(int fd, char *name)
+{
+       mdp_super_t super;
+       time_t crtime;
+       if (load_super(fd, &super))
+               return 0;
+       /* Looks like a raid array .. */
+       fprintf(stderr, Name ": %s appears to be part of a raid array:\n",
+               name);
+       crtime = super.ctime;
+       fprintf(stderr, "    level=%d devices=%d ctime=%s",
+               super.level, super.raid_disks, ctime(&crtime));
+       return 1;
+}
+
+
+int ask(char *mesg)
+{
+       char *add = "";
+       int i;
+       for (i=0; i<5; i++) {
+               char buf[100];
+               fprintf(stderr, "%s%s", mesg, add);
+               fflush(stderr);
+               if (fgets(buf, 100, stdin)==NULL)
+                       return 0;
+               if (buf[0]=='y' || buf[0]=='Y')
+                       return 1;
+               if (buf[0]=='n' || buf[0]=='N')
+                       return 0;
+               add = "(y/n) ";
+       }
+       fprintf(stderr, Name ": assuming 'no'\n");
+       return 0;
+}
+
+char *map_num(mapping_t *map, int num)
+{
+       while (map->name) {
+               if (map->num == num)
+                       return map->name;
+               map++;
+       }
+       return NULL;
+}
+
+int map_name(mapping_t *map, char *name)
+{
+       while (map->name) {
+               if (strcmp(map->name, name)==0)
+                       return map->num;
+               map++;
+       }
+       return UnSet;
+}
+
+/*
+ * convert a major/minor pair for a block device into a name in /dev, if possible.
+ * On the first call, walk /dev collecting name.
+ * Put them in a simple linked listfor now.
+ */
+struct devmap {
+    int major, minor;
+    char *name;
+    struct devmap *next;
+} *devlist = NULL;
+int devlist_ready = 0;
+
+#ifdef UCLIBC
+char *map_dev(int major, int minor)
+{
+#if 0
+       fprintf(stderr, "Warning - fail to map %d,%d to a device name\n",
+               major, minor);
+#endif
+       return NULL;
+}
+#else
+#define  __USE_XOPEN_EXTENDED
+#include <ftw.h>
+
+
+#ifndef __dietlibc__
+int add_dev(const char *name, const struct stat *stb, int flag, struct FTW *s)
+#else
+int add_dev(const char *name, const struct stat *stb, int flag)
+#endif
+{
+    if ((stb->st_mode&S_IFMT)== S_IFBLK) {
+       char *n = strdup(name);
+       struct devmap *dm = malloc(sizeof(*dm));
+       if (dm) {
+           dm->major = MAJOR(stb->st_rdev);
+           dm->minor = MINOR(stb->st_rdev);
+           dm->name = n;
+           dm->next = devlist;
+           devlist = dm;
+       }
+    }
+    return 0;
+}
+
+int is_standard(char *dev)
+{
+       /* tests if dev is a "standard" md dev name.
+        * i.e if the last component is "/dNN" or "/mdNN",
+        * where NN is a string of digits 
+        */
+       dev = strrchr(dev, '/');
+       if (!dev)
+               return 0;
+       if (strncmp(dev, "/d",2)==0)
+               dev += 2;
+       else if (strncmp(dev, "/md", 3)==0)
+               dev += 3;
+       else
+               return 0;
+       if (!*dev)
+               return 0;
+       while (isdigit(*dev))
+               dev++;
+       if (*dev)
+               return 0;
+       return 1;
+}
+
+
+/*
+ * Find a block device with the right major/minor number.
+ * Avoid /dev/mdNN and /dev/md/dNN is possible
+ */
+char *map_dev(int major, int minor)
+{
+       struct devmap *p;
+       char *std = NULL;
+       if (!devlist_ready) {
+#ifndef __dietlibc__
+               nftw("/dev", add_dev, 10, FTW_PHYS);
+#else
+               ftw("/dev", add_dev, 10);
+#endif
+               devlist_ready=1;
+       }
+
+       for (p=devlist; p; p=p->next)
+               if (p->major == major &&
+                   p->minor == minor) {
+                       if (is_standard(p->name))
+                               std = p->name;
+                       else
+                               return p->name;
+               }
+       return std;
+}
+
+#endif
+
+unsigned long calc_sb_csum(mdp_super_t *super)
+{
+        unsigned int  oldcsum = super->sb_csum;
+       unsigned long long newcsum = 0;
+       unsigned long csum;
+       int i;
+       unsigned int *superc = (int*) super;
+       super->sb_csum = 0;
+
+       for(i=0; i<MD_SB_BYTES/4; i++)
+               newcsum+= superc[i];
+       csum = (newcsum& 0xffffffff) + (newcsum>>32);
+       super->sb_csum = oldcsum;
+       return csum;
+}
+
+char *human_size(long long bytes)
+{
+       static char buf[30];
+       
+
+       if (bytes < 5000*1024)
+               buf[0]=0;
+       else if (bytes < 2*1024LL*1024LL*1024LL)
+               sprintf(buf, " (%ld.%02ld MiB %ld.%02ld MB)",
+                       (long)(bytes>>20),
+                       (long)((bytes&0xfffff)+0x100000/200)/(0x100000/100),
+                       (long)(bytes/1000/1000),
+                       (long)(((bytes%1000000)+5000)/10000)
+                       );
+       else
+               sprintf(buf, " (%ld.%02ld GiB %ld.%02ld GB)",
+                       (long)(bytes>>30),
+                       (long)(((bytes>>10)&0xfffff)+0x100000/200)/(0x100000/100),
+                       (long)(bytes/1000LL/1000LL/1000LL),
+                       (long)((((bytes/1000)%1000000)+5000)/10000)
+                       );
+       return buf;
+}
+
+char *human_size_brief(long long bytes)
+{
+       static char buf[30];
+       
+
+       if (bytes < 5000*1024)
+               sprintf(buf, "%ld.%02ldKiB",
+                       (long)(bytes>>10), (long)(((bytes&1023)*100+512)/1024)
+                       );
+       else if (bytes < 2*1024LL*1024LL*1024LL)
+               sprintf(buf, "%ld.%02ldMiB",
+                       (long)(bytes>>20),
+                       (long)((bytes&0xfffff)+0x100000/200)/(0x100000/100)
+                       );
+       else
+               sprintf(buf, "%ld.%02ldGiB",
+                       (long)(bytes>>30),
+                       (long)(((bytes>>10)&0xfffff)+0x100000/200)/(0x100000/100)
+                       );
+       return buf;
+}
+
+int get_mdp_major(void)
+{
+static int mdp_major = -1;
+       FILE *fl;
+       char *w;
+       int have_block = 0;
+       int have_devices = 0;
+       int last_num = -1;
+
+       if (mdp_major != -1)
+               return mdp_major;
+       fl = fopen("/proc/devices", "r");
+       if (!fl)
+               return -1;
+       while ((w = conf_word(fl, 1))) {
+               if (have_block && strcmp(w, "devices:")==0)
+                       have_devices = 1;
+               have_block =  (strcmp(w, "Block")==0);
+               if (isdigit(w[0]))
+                       last_num = atoi(w);
+               if (have_devices && strcmp(w, "mdp")==0)
+                       mdp_major = last_num;
+               free(w);
+       }
+       fclose(fl);
+       return mdp_major;
+}
+
+
+
+char *get_md_name(int dev)
+{
+       /* find /dev/md%d or /dev/md/%d or make a device /dev/.tmp.md%d */
+       /* if dev < 0, want /dev/md/d%d or find mdp in /proc/devices ... */
+       static char devname[50];
+       struct stat stb;
+       dev_t rdev;
+       char *dn;
+
+       if (dev < 0) {
+               int mdp =  get_mdp_major();
+               if (mdp < 0) return NULL;
+               rdev = MKDEV(mdp, (-1-dev)<<6);
+               sprintf(devname, "/dev/md/d%d", -1-dev);
+               if (stat(devname, &stb) == 0
+                   && (S_IFMT&stb.st_mode) == S_IFBLK
+                   && (stb.st_rdev == rdev))
+                       return devname;
+       } else {
+               rdev = MKDEV(MD_MAJOR, dev);
+               sprintf(devname, "/dev/md%d", dev);
+               if (stat(devname, &stb) == 0
+                   && (S_IFMT&stb.st_mode) == S_IFBLK
+                   && (stb.st_rdev == rdev))
+                       return devname;
+
+               sprintf(devname, "/dev/md/%d", dev);
+               if (stat(devname, &stb) == 0
+                   && (S_IFMT&stb.st_mode) == S_IFBLK
+                   && (stb.st_rdev == rdev))
+                       return devname;
+       }
+       dn = map_dev(MAJOR(rdev), MINOR(rdev));
+       if (dn)
+               return dn;
+       sprintf(devname, "/dev/.tmp.md%d", dev);
+       if (mknod(devname, S_IFBLK | 0600, rdev) == -1)
+               if (errno != EEXIST)
+                       return NULL;
+
+       if (stat(devname, &stb) == 0
+           && (S_IFMT&stb.st_mode) == S_IFBLK
+           && (stb.st_rdev == rdev))
+               return devname;
+       unlink(devname);
+       return NULL;
+}
+
+void put_md_name(char *name)
+{
+       if (strncmp(name, "/dev/.tmp.md", 12)==0)
+               unlink(name);
+}