FreeType 1.31.1

contrib/ftos2/uninst.c

@@ -0,0 +1,60 @@
+/*                                                                  */
+/*                  UNINST - FreeType/2 uninstaller                 */
+/*                                                                  */
+/*          Copyright 1998 Michal Necasek <mike@mendelu.cz>         */
+/*                                                                  */
+/* UNINSTALL.CMD rewritten in C - apparently the REXX version fails */
+/* when OS/2 is booted to command line. This causes problems if     */
+/* FreeType/2 prevents PM from starting successfully.               */
+/*                                                                  */
+/* Note: This can be compiled as 16-bit app to keep the size down.  */
+
+#define  INCL_NOXLATE_WIN16
+#define  INCL_NOXLATE_DOS16
+#define  INCL_WINSHELLDATA
+#define  INCL_DOSMISC
+#include <os2.h>
+
+#include <stdio.h>
+#include <string.h>
+#include <conio.h>
+
+char szApp[] = "PM_Font_Drivers";
+char szKey[] = "TRUETYPE";
+char szBuffer[300];
+
+void main(void) {
+   ULONG  ulBootDrv;
+   USHORT usLen = 0;
+   APIRET rc;
+   char   c;
+
+   usLen = PrfQueryProfileString(HINI_USERPROFILE, szApp, szKey, NULL,
+                                 (PVOID)szBuffer, 260L);
+
+   if (!strcmp("\\OS2\\DLL\\FREETYPE.DLL", szBuffer)) {
+      if(!PrfWriteProfileString(HINI_USERPROFILE, szApp, szKey, NULL))
+         goto err;
+
+      printf("FreeType/2 successfully removed.\n");
+      printf("Do you wish to restore TRUETYPE.DLL (y/n)? ");
+      c = getch();
+      if (c != 'y' && c != 'Y')
+         return;
+
+      if(!PrfWriteProfileString(HINI_USERPROFILE, szApp, szKey,
+                                 "\\OS2\\DLL\\TRUETYPE.DLL"))
+         goto err;
+
+      printf("\nTRUETYPE.DLL successfully restored");
+   }
+   else {
+      printf("FreeType/2 not installed!");
+      return;
+   }
+
+   return;
+
+err:
+   printf("Uninstallation failed!");
+}