ms/applink.c

   1 /*
   2  * Copyright 2004-2023 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 #define APPLINK_STDIN   1
  11 #define APPLINK_STDOUT  2
  12 #define APPLINK_STDERR  3
  13 #define APPLINK_FPRINTF 4
  14 #define APPLINK_FGETS   5
  15 #define APPLINK_FREAD   6
  16 #define APPLINK_FWRITE  7
  17 #define APPLINK_FSETMOD 8
  18 #define APPLINK_FEOF    9
  19 #define APPLINK_FCLOSE  10      /* should not be used */
  20
  21 #define APPLINK_FOPEN   11      /* solely for completeness */
  22 #define APPLINK_FSEEK   12
  23 #define APPLINK_FTELL   13
  24 #define APPLINK_FFLUSH  14
  25 #define APPLINK_FERROR  15
  26 #define APPLINK_CLEARERR 16
  27 #define APPLINK_FILENO  17      /* to be used with below */
  28
  29 #define APPLINK_OPEN    18      /* formally can't be used, as flags can vary */
  30 #define APPLINK_READ    19
  31 #define APPLINK_WRITE   20
  32 #define APPLINK_LSEEK   21
  33 #define APPLINK_CLOSE   22
  34 #define APPLINK_MAX     22      /* always same as last macro */
  35
  36 #ifndef APPMACROS_ONLY
  37
  38 /*
  39  * Normally, do not define APPLINK_NO_INCLUDES.  Define it if you are using
  40  * symbol preprocessing and do not want the preprocessing to affect the
  41  * following included header files.  You will need to put these
  42  * include lines somewhere in the file that is including applink.c.
  43  */
  44 # ifndef APPLINK_NO_INCLUDES
  45 #  include <stdio.h>
  46 #  include <io.h>
  47 #  include <fcntl.h>
  48 # endif
  49
  50 # ifdef __BORLANDC__
  51    /* _lseek in <io.h> is a function-like macro so we can't take its address */
  52 #  undef _lseek
  53 #  define _lseek lseek
  54 # endif
  55
  56 static void *app_stdin(void)
  57 {
  58     return stdin;
  59 }
  60
  61 static void *app_stdout(void)
  62 {
  63     return stdout;
  64 }
  65
  66 static void *app_stderr(void)
  67 {
  68     return stderr;
  69 }
  70
  71 static int app_feof(FILE *fp)
  72 {
  73     return feof(fp);
  74 }
  75
  76 static int app_ferror(FILE *fp)
  77 {
  78     return ferror(fp);
  79 }
  80
  81 static void app_clearerr(FILE *fp)
  82 {
  83     clearerr(fp);
  84 }
  85
  86 static int app_fileno(FILE *fp)
  87 {
  88     return _fileno(fp);
  89 }
  90
  91 static int app_fsetmod(FILE *fp, char mod)
  92 {
  93     return _setmode(_fileno(fp), mod == 'b' ? _O_BINARY : _O_TEXT);
  94 }
  95
  96 #ifdef __cplusplus
  97 extern "C" {
  98 #endif
  99
 100 __declspec(dllexport)
 101 void **
 102 # if defined(__BORLANDC__)
 103 /*
 104  * __stdcall appears to be the only way to get the name
 105  * decoration right with Borland C. Otherwise it works
 106  * purely incidentally, as we pass no parameters.
 107  */
 108 __stdcall
 109 # else
 110 __cdecl
 111 # endif
 112 OPENSSL_Applink(void)
 113 {
 114     static int once = 1;
 115     static void *OPENSSL_ApplinkTable[APPLINK_MAX + 1] =
 116         { (void *)APPLINK_MAX };
 117
 118     if (once) {
 119         OPENSSL_ApplinkTable[APPLINK_STDIN] = app_stdin;
 120         OPENSSL_ApplinkTable[APPLINK_STDOUT] = app_stdout;
 121         OPENSSL_ApplinkTable[APPLINK_STDERR] = app_stderr;
 122         OPENSSL_ApplinkTable[APPLINK_FPRINTF] = fprintf;
 123         OPENSSL_ApplinkTable[APPLINK_FGETS] = fgets;
 124         OPENSSL_ApplinkTable[APPLINK_FREAD] = fread;
 125         OPENSSL_ApplinkTable[APPLINK_FWRITE] = fwrite;
 126         OPENSSL_ApplinkTable[APPLINK_FSETMOD] = app_fsetmod;
 127         OPENSSL_ApplinkTable[APPLINK_FEOF] = app_feof;
 128         OPENSSL_ApplinkTable[APPLINK_FCLOSE] = fclose;
 129
 130         OPENSSL_ApplinkTable[APPLINK_FOPEN] = fopen;
 131         OPENSSL_ApplinkTable[APPLINK_FSEEK] = fseek;
 132         OPENSSL_ApplinkTable[APPLINK_FTELL] = ftell;
 133         OPENSSL_ApplinkTable[APPLINK_FFLUSH] = fflush;
 134         OPENSSL_ApplinkTable[APPLINK_FERROR] = app_ferror;
 135         OPENSSL_ApplinkTable[APPLINK_CLEARERR] = app_clearerr;
 136         OPENSSL_ApplinkTable[APPLINK_FILENO] = app_fileno;
 137
 138         OPENSSL_ApplinkTable[APPLINK_OPEN] = _open;
 139         OPENSSL_ApplinkTable[APPLINK_READ] = _read;
 140         OPENSSL_ApplinkTable[APPLINK_WRITE] = _write;
 141         OPENSSL_ApplinkTable[APPLINK_LSEEK] = _lseek;
 142         OPENSSL_ApplinkTable[APPLINK_CLOSE] = _close;
 143
 144         once = 0;
 145     }
 146
 147     return OPENSSL_ApplinkTable;
 148 }
 149
 150 #ifdef __cplusplus
 151 }
 152 #endif
 153 #endif