disk sn

open-license-manager

2014-04-24 0fa875ba166df3985adb4e1f2229fd7e7a4189f1

 src/library/os/linux/os-linux.c

@@ -26,6 +26,10 @@
#include <openssl/pem.h>
#include <openssl/err.h>

#include <mntent.h>
#include <dirent.h>
#include <stdio.h>

static int ifname_position(char *ifnames, char * ifname, int ifnames_max) {
   int i, position;
   position = -1;
@@ -77,7 +81,7 @@
         strncpy(&ifnames[if_num * NI_MAXHOST], ifa->ifa_name, NI_MAXHOST);
         if (adapterInfos != NULL && if_num < *adapter_info_size) {
            strncpy(adapterInfos[if_num].description, ifa->ifa_name,
                  NI_MAXHOST);
            NI_MAXHOST);
         }
         if_name_position = if_num;
         if_num++;
@@ -137,7 +141,7 @@
#endif
            }
#ifdef _DEBUG
               printf("\t %s\n", ifa->ifa_name);
            printf("\t %s\n", ifa->ifa_name);
#endif

         }
@@ -153,27 +157,182 @@
   freeifaddrs(ifaddr);
   return f_return;
}

/**
 *Usually uuid are hex number separated by "-". this method read up to 8 hex
 *numbers skipping - characters.
 *@param uuid uuid as read in /dev/disk/by-uuid
 *@param buffer_out: unsigned char buffer[8] output buffer for result
 */
static void parseUUID(const char *uuid, unsigned char* buffer_out,
      unsigned int out_size) {
   size_t len;
   unsigned int i, j;
   char * hexuuid;
   //remove characters not in hex set
   len = strlen(uuid);
   hexuuid = (char *) malloc(sizeof(char) * out_size * 2 + 1);
   for (i = 0, j = 0; j < out_size * 2; i++) {
      if (i < len) {
         if (isxdigit(uuid[i])) {
            hexuuid[j] = uuid[i];
            j++;
         } else {
            //skip
            continue;
         }
      } else {
         hexuuid[j] = '0';
         j++;
      }
   }
   hexuuid[j] = '\0';
   for (i = 0; i < out_size; i++) {
      sscanf(&hexuuid[i * 2], "%2hhx", &buffer_out[i]);
   }
   free(hexuuid);
}
#define MAX_UNITS 20
FUNCTION_RETURN getDiskInfos(DiskInfo * diskInfos, size_t * disk_info_size) {
   struct stat filename_stat, mount_stat;
   static char discard[1024];
   char device[64], name[64], type[64];
   FILE *mounts = fopen(_PATH_MOUNTED, "r");
   if (mounts == NULL) {
   struct stat mount_stat, sym_stat;
   /*static char discard[1024];
    char device[64], name[64], type[64];
    */
   char path[MAX_PATH], cur_dir[MAX_PATH];
   struct mntent *ent;

   int maxDrives, currentDrive, i, drive_found;
   __ino64_t *statDrives;
   DiskInfo *tmpDrives;
   FILE *aFile;
   DIR *disk_by_uuid_dir, *disk_by_label;
   struct dirent *dir;
   FUNCTION_RETURN result;

   if (diskInfos != NULL) {
      maxDrives = *disk_info_size;
      tmpDrives = diskInfos;
   } else {
      maxDrives = MAX_UNITS;
      tmpDrives = (DiskInfo *) malloc(sizeof(DiskInfo) * maxDrives);
   }
   statDrives = (__ino64_t *) malloc(maxDrives * sizeof(__ino64_t ));
   memset(tmpDrives, 0, sizeof(DiskInfo) * maxDrives);

   aFile = setmntent("/proc/mounts", "r");
   if (aFile == NULL) {
      /*proc not mounted*/
      return ERROR;
   }

   while (fscanf(mounts, "%64s %64s %64s %1024[^\n]", device, name, type,
         discard) != EOF) {
      if (stat(device, &mount_stat) != 0)
         continue;
      if (filename_stat.st_dev == mount_stat.st_rdev) {
         fprintf(stderr, "device: %s; name: %s; type: %s\n", device, name,
               type);
      }
   disk_by_uuid_dir = opendir("/dev/disk/by-uuid");
   if (disk_by_uuid_dir == NULL) {
#ifdef _DEBUG
      printf("Open /dev/disk/by-uuid fail");
#endif
      return ERROR;
   }

   return ERROR;
   currentDrive = 0;
   while (NULL != (ent = getmntent(aFile))) {
      if ((strncmp(ent->mnt_type, "ext", 3) == 0
            || strncmp(ent->mnt_type, "vfat", 4) == 0
            || strncmp(ent->mnt_type, "ntfs", 4) == 0)
            && ent->mnt_fsname != NULL
            && strncmp(ent->mnt_fsname, "/dev/", 5) == 0) {
         if (stat(ent->mnt_fsname, &mount_stat) == 0) {
            drive_found = -1;
            for (i = 0; i < currentDrive; i++) {
               if (statDrives[i] == mount_stat.st_ino) {
                  drive_found = i;
               }
            }
            if (drive_found == -1) {
#ifdef _DEBUG
               printf("mntent: %s %s %d\n", ent->mnt_fsname, ent->mnt_dir,
                     mount_stat.st_ino);
#endif
               strcpy(tmpDrives[currentDrive].device, ent->mnt_fsname);
               statDrives[currentDrive] = mount_stat.st_ino;
               drive_found = currentDrive;
               currentDrive++;
            }
            if (strcmp(ent->mnt_dir, "/") == 0) {
               strcpy(tmpDrives[drive_found].label, "root");
#ifdef _DEBUG
               printf("drive %d set to preferred\n", ent->mnt_fsname);
#endif
               tmpDrives[drive_found].preferred = true;
            }
         }
      }
   }
   endmntent(aFile);
   if (diskInfos == NULL) {
      *disk_info_size = currentDrive;
      free(tmpDrives);
      result = OK;
   } else if (*disk_info_size >= currentDrive) {
      result = OK;
      *disk_info_size = currentDrive;
      while ((dir = readdir(disk_by_uuid_dir)) != NULL) {
         strcpy(cur_dir, "/dev/disk/by-uuid/");
         strcat(cur_dir, dir->d_name);
         if (stat(cur_dir, &sym_stat) == 0) {
            for (i = 0; i < currentDrive; i++) {
               if (sym_stat.st_ino == statDrives[i]) {
                  parseUUID(dir->d_name, tmpDrives[i].disk_sn,
                        sizeof(tmpDrives[i].disk_sn));
#ifdef _DEBUG
                  printf("uuid %d %s %s %02x%02x%02x%02x\n", i,
                        tmpDrives[i].device, path,
                        tmpDrives[i].disk_sn[0],
                        tmpDrives[i].disk_sn[1],
                        tmpDrives[i].disk_sn[2],
                        tmpDrives[i].disk_sn[3]);
#endif
               }
            }
         }
      }
      closedir(disk_by_uuid_dir);

      disk_by_label = opendir("/dev/disk/by-label");
      if (disk_by_label != NULL) {
         while ((dir = readdir(disk_by_label)) != NULL) {
            strcpy(cur_dir, "/dev/disk/by-label/");
            strcat(cur_dir, dir->d_name);
            if (stat(cur_dir, &sym_stat) == 0) {
               for (i = 0; i < currentDrive; i++) {
                  if (sym_stat.st_ino == statDrives[i]) {
                     strncpy(tmpDrives[i].label, dir->d_name, 255);
                     printf("label %d %s %s\n", i, tmpDrives[i].label,
                           tmpDrives[i].device);
                  }
               }
            }
         }
         closedir(disk_by_label);
      }
   } else {
      result = BUFFER_TOO_SMALL;
   }
   /*
    FILE *mounts = fopen(_PATH_MOUNTED, "r");
    if (mounts == NULL) {
    return ERROR;
    }

    while (fscanf(mounts, "%64s %64s %64s %1024[^\n]", device, name, type,
    discard) != EOF) {
    if (stat(device, &mount_stat) != 0)
    continue;
    if (filename_stat.st_dev == mount_stat.st_rdev) {
    fprintf(stderr, "device: %s; name: %s; type: %s\n", device, name,
    type);
    }
    }
    */
   return result;
}

void os_initialize() {