]> git.ipfire.org Git - thirdparty/mdadm.git/blobdiff - util.c
Fix parsing of /dev/md/N in is_standard
[thirdparty/mdadm.git] / util.c
diff --git a/util.c b/util.c
index bd7f1d8fd5e992b5511cd2b91a5dc3004a5d90fc..8febfd2c0ab6e0ff5a3aa23b7ac4d0c912b22221 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;
-
-    if (MAJOR(stb.st_rdev) == MD_MAJOR)
-       return (36<<8);
+       return  (vers.major*10000) + (vers.minor*100) + vers.patchlevel;
+    if (errno == EACCES)
+           return -1;
+    if (major(stb.st_rdev) == MD_MAJOR)
+       return (3600);
     return -1;
 }
 
@@ -99,18 +103,28 @@ 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 10: return 1; /* a lie, but it is hard to tell */
+
+       case -4:
+               return avail_disks>= 1;
        case -1:
        case 0:
                return avail_disks == raid_disks;
@@ -119,6 +133,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;
        }
@@ -134,91 +150,445 @@ int same_uuid(int a[4], int b[4])
     return 0;
 }
 
-void uuid_from_super(int uuid[4], mdp_super_t *super)
+int check_ext2(int fd, char *name)
 {
-    uuid[0] = super->set_uuid0;
-    if (super->minor_version >= 90) {
-       uuid[1] = super->set_uuid1;
-       uuid[2] = super->set_uuid2;
-       uuid[3] = super->set_uuid3;
-    } else {
-       uuid[1] = 0;
-       uuid[2] = 0;
-       uuid[3] = 0;
-    }
+       /*
+        * 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((char*)sb+52, "ReIsErFs",8)!=0 &&
+           strncmp((char*)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 compare_super(mdp_super_t *first, mdp_super_t *second)
+int check_raid(int fd, char *name)
 {
-    /*
-     * return:
-     *  0 same, or first was empty, and second was copied
-     *  1 second had wrong number
-     *  2 wrong uuid
-     *  3 wrong other info
-     */
-    int uuid1[4], uuid2[4];
-    if (second->md_magic != MD_SB_MAGIC)
+       void *super;
+       struct mdinfo info;
+       time_t crtime;
+       struct supertype *st = guess_super(fd);
+
+       if (!st) return 0;
+       st->ss->load_super(st, fd, &super, name);
+       /* Looks like a raid array .. */
+       fprintf(stderr, Name ": %s appears to be part of a raid array:\n",
+               name);
+       st->ss->getinfo_super(&info, super);
+       free(super);
+       crtime = info.array.ctime;
+       fprintf(stderr, "    level=%d devices=%d ctime=%s",
+               info.array.level, info.array.raid_disks, ctime(&crtime));
        return 1;
-    if (first-> md_magic != MD_SB_MAGIC) {
-       memcpy(first, second, sizeof(*first));
+}
+
+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;
-    }
+}
 
-    uuid_from_super(uuid1, first);
-    uuid_from_super(uuid2, second);
-    if (!same_uuid(uuid1, uuid2))
-       return 2;
-    if (first->major_version != second->major_version ||
-       first->minor_version != second->minor_version ||
-       first->patch_version != second->patch_version ||
-       first->gvalid_words  != second->gvalid_words  ||
-       first->ctime         != second->ctime         ||
-       first->level         != second->level         ||
-       first->size          != second->size          ||
-       first->raid_disks    != second->raid_disks    )
-       return 3;
+char *map_num(mapping_t *map, int num)
+{
+       while (map->name) {
+               if (map->num == num)
+                       return map->name;
+               map++;
+       }
+       return NULL;
+}
 
-    return 0;
+int map_name(mapping_t *map, char *name)
+{
+       while (map->name) {
+               if (strcmp(map->name, name)==0)
+                       return map->num;
+               map++;
+       }
+       return UnSet;
 }
 
-int load_super(int fd, mdp_super_t *super)
+
+int is_standard(char *dev, int *nump)
 {
-       /* try to read in the superblock
-        *
-        * return
-        *   0 - success
-        *   1 - no block size
-        *   2 - too small
-        *   3 - no seek
-        *   4 - no read
-        *   5 - no magic
-        *   6 - wrong major version
+       /* 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 
         */
-       long size;
-       long long offset;
-    
-       if (ioctl(fd, BLKGETSIZE, &size))
-               return 1;
+       char *d = strrchr(dev, '/');
+       int type=0;
+       int num;
+       if (!d)
+               return 0;
+       if (strncmp(d, "/d",2)==0)
+               d += 2, type=1; /* /dev/md/dN{pM} */
+       else if (strncmp(d, "/md_d", 5)==0)
+               d += 5, type=1; /* /dev/md_dNpM */
+       else if (strncmp(d, "/md", 3)==0)
+               d += 3, type=-1; /* /dev/mdN */
+       else if (d-dev > 3 && strncmp(d-2, "md/", 3)==0)
+               d += 1, type=-1; /* /dev/md/N */
+       else
+               return 0;
+       if (!*d)
+               return 0;
+       num = atoi(d);
+       while (isdigit(*d))
+               d++;
+       if (*d)
+               return 0;
+       if (nump) *nump = num;
 
-       if (size < MD_RESERVED_SECTORS*2)
-               return 2;
+       return type;
+}
+
+
+/*
+ * 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;
+}
+
+/*
+ * Find a block device with the right major/minor number.
+ * Avoid /dev/mdNN and /dev/md/dNN if 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, NULL))
+                               std = p->name;
+                       else
+                               return p->name;
+               }
+       return std;
+}
+
+#endif
+
+unsigned long calc_csum(void *super, int bytes)
+{
+       unsigned long long newcsum = 0;
+       int i;
+       unsigned int csum;
+       unsigned int *superc = (unsigned int*) super;
+
+       for(i=0; i<bytes/4; i++)
+               newcsum+= superc[i];
+       csum = (newcsum& 0xffffffff) + (newcsum>>32);
+#ifdef __alpha__
+/* The in-kernel checksum calculation is always 16bit on 
+ * the alpha, though it is 32 bit on i386...
+ * I wonder what it is elsewhere... (it uses and API in
+ * a way that it shouldn't).
+ */
+       csum = (csum & 0xffff) + (csum >> 16);
+       csum = (csum & 0xffff) + (csum >> 16);
+#endif
+       return csum;
+}
+
+char *human_size(long long bytes)
+{
+       static char buf[30];
        
-       offset = MD_NEW_SIZE_SECTORS(size);
 
-       offset *= 512;
+       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;
+}
 
-       if (lseek64(fd, offset, 0)< 0LL)
-               return 3;
+char *human_size_brief(long long bytes)
+{
+       static char buf[30];
+       
 
-       if (read(fd, &super, sizeof(super)) != sizeof(super))
-               return 4;
+       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;
+}
 
-       if (super->md_magic != MD_SB_MAGIC)
-               return 5;
+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 (super->major_version != 0)
-               return 6;
-       return 0;
+       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 = makedev(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 = makedev(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);
+}
+
+
+
+
+struct superswitch *superlist[] = { &super0, &super1, NULL };
+
+struct supertype *super_by_version(int vers, int minor)
+{
+       struct supertype *st = malloc(sizeof(*st));
+       if (!st) return st;
+       if (vers == 0) {
+               st->ss = &super0;
+               st->max_devs = MD_SB_DISKS;
+       }
+
+       if (vers == 1) {
+               st->ss = &super1;
+               st->max_devs = 384;
+       }
+       st->minor_version = minor;
+       return st;
+}
+
+struct supertype *guess_super(int fd)
+{
+       /* try each load_super to find the best match,
+        * and return the best superswitch
+        */
+       struct superswitch  *ss;
+       struct supertype *st;
+       unsigned long besttime = 0;
+       int bestsuper = -1;
+       
+       void *sbp = NULL;
+       int i;
+
+       st = malloc(sizeof(*st));
+       memset(st, 0, sizeof(*st));
+       for (i=0 ; superlist[i]; i++) {
+               int rv;
+               ss = superlist[i];
+               rv = ss->load_super(st, fd, &sbp, NULL);
+               if (rv == 0) {
+                       struct mdinfo info;
+                       ss->getinfo_super(&info, sbp);
+                       if (bestsuper == -1 ||
+                           besttime < info.array.ctime) {
+                               bestsuper = i;
+                               besttime = info.array.ctime;
+                       }
+                       st->ss = NULL;
+                       free(sbp);
+               }
+       }
+       if (bestsuper != -1) {
+               int rv;
+               rv = superlist[bestsuper]->load_super(st, fd, &sbp, NULL);
+               if (rv == 0) {
+                       free(sbp);
+                       return st;
+               }
+       }
+       free(st);
+       return NULL;
+}