Subversion Repositories SvarDOS

/*
 * This program creates a header file for the SvarDOS installer, that
 * contains the list of all supported keyboard layouts, along with a way to
 * select sets of keyboard layouts that apply to only a specific region.
 *
 * Copyright (C) 2016-2024 Mateusz Viste
 */

/* the kblayouts list is a NULL-terminated array that contains entries in the
 * following format:
 * human description string <0> layout code string <0> <codepage number as a 16bit value> <ega.sys file number as a single byte> <keyboard.sys file number as a single byte> <sub keyb ID as a 16bit value, zero if none>

    char *kblayouts[] = {
    "English (US)\0xxxx",
    "Polish\0pl\0xxxx"};
  };
 */


#include <stdio.h>
#include <string.h>


static unsigned char EGAFILES_USED[20];

/* global file pointers */
FILE *fdkeyb, *fdoff;


/* Converts a positive base_10 into base_8 */
static unsigned int dec2oct(int n) {
  int res=0, digitPos=1;
  while (n) {
    res += (n & 7) * digitPos;
    n >>= 3;
    digitPos *= 10;
  }
  return(res);
}


static void addnew(char *countrycode, unsigned short countryid, char *humanlang, char *keybcode, unsigned short cp, unsigned char egafile, unsigned char keybfile, unsigned int subid) {
  static char lastcountry[4] = {0};
  static int curoffset = 0, curcountryoffset = 0;
  int i;

  /* remember the EGA file */
  for (i = 0; (EGAFILES_USED[i] != egafile) && (EGAFILES_USED[i] != 0xff); i++);
  EGAFILES_USED[i] = egafile;

  /* if new country, declare an offset */
  if (strcmp(countrycode, lastcountry) != 0) {
    /* close previous one, if any */
    if (lastcountry[0] != 0) {
      fprintf(fdoff, "#define OFFLEN_%s %d\r\n", lastcountry, curoffset - curcountryoffset);
    } else {
      fprintf(fdkeyb, "const char *kblayouts[] = {\r\n");
    }
    /* open new one, if any */
    if (countrycode[0] != 0) {
      fprintf(fdkeyb, "  /****** %s ******/\r\n", countrycode);
      curcountryoffset = curoffset;
      fprintf(fdoff, "#define OFFLOC_%s %d\r\n", countrycode, curoffset);
      strcpy(lastcountry, countrycode);
    } else {
      fprintf(fdoff, "#define OFFCOUNT %d\r\n", curoffset);
    }
  }
  /* */
  if (countrycode[0] != 0) {
    fprintf(fdkeyb, "  \"%s\\0%s\\0\\%d\\%d\\%d\\%d\\%d\\%d\\%d\\%d\",\r\n", humanlang, keybcode, dec2oct(cp >> 8), dec2oct(cp & 0xff), dec2oct(egafile), dec2oct(keybfile), dec2oct(subid >> 8), dec2oct(subid & 0xff), dec2oct(countryid >> 8), dec2oct(countryid & 0xff));
  } else {
    fprintf(fdkeyb, "  NULL};\r\n");
  }
  curoffset++;
}


int main(void) {

  /* reset EGAFILES_USED, it will be used to remember which EGA*.CPX files are
   * required by the SvarDOS installer */
  memset(EGAFILES_USED, 0xff, sizeof(EGAFILES_USED));

  /*** open files ***/
  fdkeyb = fopen("keylay.h", "wb");
  fdoff = fopen("keyoff.h", "wb");
  fprintf(fdkeyb, "/* DO NOT EDIT THIS FILE, IT IS AUTO-GENERATED BY LOCALES.EXE */\r\n");
  fprintf(fdoff, "/* DO NOT EDIT THIS FILE, IT IS AUTO-GENERATED BY LOCALES.EXE */\r\n");

  /******************* LAYOUTS LIST START *******************/

  /* addnew(countrycode, countryid, humanlang, keybcode, cp, egafile, keybfile, subid) */

  /* English */
  addnew("EN",  1, "English (US)", "en", 437, 0, 0, 0);
  addnew("EN", 44, "English (UK)", "uk", 437, 0, 1, 0);

  /* Armenian */
  addnew("HY", 374, "Armenian", "hy", 899, 6, 3, 0);

  /* Brazilian */
  addnew("BR", 55, "Brazilian", "br", 850, 1, 1, 0);
  addnew("BR", 55, "Brazilian (US layout)", "br274", 850, 1, 1, 0);

  /* Bulgarian */
  addnew("BG", 359, "Bulgarian", "bg", 872, 3, 2, 0);

  /* French */
  addnew("FR", 33, "French (France)", "fr", 858, 1, 1, 0);
  addnew("FR", 1, "French (Canada, standard)", "cf", 863, 9, 1, 0);
  addnew("FR", 1, "French (Canada, legacy)", "cf", 863, 9, 1, 501);
  addnew("FR", 41, "French (Switzerland)", "sf", 858, 1, 1, 0);

  /* German */
  addnew("DE", 49, "German", "de", 858, 1, 1, 0);

  /* Hungarian */
  addnew("HU", 36, "Hungarian", "hu", 852, 1, 1, 208);

  /* Italian */
  addnew("IT", 39, "Italian", "it", 858, 1, 1, 0);

  /* Latin-American */
  addnew("LA", 54, "Latin-American", "la", 437, 0, 1, 0);

  /* Norvegian */
  addnew("NO", 47, "Norvegian", "no", 858, 9, 1, 0);

  /* Polish */
  addnew("PL", 48, "Polish (Programmer)", "pl", 991, 10, 1, 0);
  addnew("PL", 48, "Polish (Typewriter)", "pl", 991, 10, 1, 214);

  /* Russian */
  addnew("RU", 7, "Russian (Standard)", "ru", 866, 3, 2, 0);
  addnew("RU", 7, "Russian (Typewriter)", "ru", 866, 3, 2, 443);

  /* Slovenian */
  addnew("SI", 386, "Slovenian", "si", 852, 1, 1, 0);

  /* Spanish */
  addnew("ES", 34, "Spanish", "es", 858, 1, 1, 0);

  /* Swedish */
  addnew("SV", 46, "Swedish", "sv", 858, 1, 1, 0);

  /* Turkish */
  addnew("TR", 90, "Turkish", "tr", 857, 1, 2, 0);

  /******************* LAYOUTS LIST STOP *******************/

  /* end of list - DO NOT REMOVE */
  addnew("", 0, "", "", 0, 0, 0, 0);

  /* close files */
  fclose(fdoff);
  fclose(fdkeyb);

  /* report what ega files are needed */
  {
    int i, ii;
    puts("Required EGA files:");
    for (ii = 1; ii < 20; ii++) {
      for (i = 0; EGAFILES_USED[i] != 0xff; i++) {
        if (EGAFILES_USED[i] != ii) continue;
        if (EGAFILES_USED[i] == 1) {
          printf("EGA.CPX\r\n");
        } else {
          printf("EGA%u.CPX\r\n", EGAFILES_USED[i]);
        }
        break;
      }
    }
  }

  return(0);
}