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 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>

/* 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, 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;

  /* 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, "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\",\r\n", humanlang, keybcode, dec2oct(cp >> 8), dec2oct(cp & 0xff), dec2oct(egafile), dec2oct(keybfile), dec2oct(subid >> 8), dec2oct(subid & 0xff));

  } else {

    fprintf(fdkeyb, "  NULL};\r\n");

  }

  curoffset++;

}

int main(void) {

  /*** 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, humanlang, keybcode, cp, egafile, keybfile, subid) */

  /* English */

  addnew("EN", "English (US)", "en", 437, 0, 0, 0);

  addnew("EN", "English (UK)", "uk", 437, 0, 1, 0);

  /* Armenian */

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

  /* Bulgarian */

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

  /* French */

  addnew("FR", "French (France)", "fr", 858, 1, 1, 0);

  addnew("FR", "French (Canada, standard)", "cf", 863, 9, 1, 0);

  addnew("FR", "French (Canada, legacy)", "cf", 863, 9, 1, 501);

  /* German */

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

  /* Hungarian */

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

  /* Italian */

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

  /* Norvegian */

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

  /* Polish */

  addnew("PL", "Polish (Programmer)", "pl", 991, 10, 1, 0);

  addnew("PL", "Polish (Typewriter)", "pl", 991, 10, 1, 214);

  /* Russian */

  addnew("RU", "Russian (Standard)", "ru", 866, 3, 2, 0);

  addnew("RU", "Russian (Typewriter)", "ru", 866, 3, 2, 443);

  /* Slovenian */

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

  /* Spanish */

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

  /* Swedish */

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

  /* Turkish */

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

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

  /* end of list - DO NOT REMOVE */

  addnew("", "", "", 0, 0, 0, 0);

  /* close files */

  fclose(fdoff);

  fclose(fdkeyb);

  return(0);

}