Вызов

Создайте программу, которая возвращает истинное значение при запуске в Microsoft Windows (для простоты мы будем придерживаться Windows 7, 8.1 и 10) и неверное значение при запуске в любой другой операционной системе (OSX, FreeBSD, Linux).

правила

• Код, который не запускается / компилируется на платформе, не считается ошибочным значением.

Критерии победы

Я маркирую это как code-golf , поэтому выигрывает самый низкий балл, но я также очень заинтересован в том, чтобы найти креативные решения этой проблемы.

Vim, 2 байта

<C-a>1

В Windows <C-a>(ctrl + a) по умолчанию отображается на Select All. Если вы 1набираете в режиме выбора в Windows, он заменяет выделение на то, что вы ввели (1), оставляя 1 в буфере.

В других операционных системах <C-a>по умолчанию отображается на Increment number. Поскольку нет никакого числа, чтобы увеличить, это - неоперация, и затем 1 увеличивает количество, но с точки зрения буфера является неоперацией.

1 - правда в Vim, а пустая строка - ложь

MATLAB, 4 байта

ispc

Из документации :

tf = ispcвозвращает логическое 1 (true), если версия программного обеспечения MATLAB® предназначена для платформы Microsoft® Windows®. В противном случае он возвращает логический 0 (ложь).

Есть также функции ismacи isunix. Я оставлю читателю понять, что делают эти функции. Mego любезно попросил схемы объяснения ismacи isunixпоэтому я попытался проиллюстрировать его здесь:

Не было предложено представить диаграмму, ispcно я могу показать, что поведение довольно схоже, за исключением замены OSXи Unixс Windows.

Второй подход:

Вот второй подход с getenvиспользованием 23 байтов, который должен быть пуленепробиваемым, если только нет другой операционной системы, начинающейся с W:

x=getenv('OS');x(1)==87

getenv 'name'ищет в основном списке среды операционной системы текст формы name=value, где nameнаходится входной символьный вектор. Если найдено, MATLAB® возвращает значение вектора символов. Если указанное имя не может быть найдено, возвращается пустая матрица.

Python 2.7.10 , 24 байта

import os
0/('['>os.sep)

Благодаря FlipTack за 3 байта

Эта программа использует тот факт, что Windows является единственной ОС, используемой \в качестве разделителя пути. Обычно это расстраивает и плохо, но на самом деле это преимущество. В Windows '['>os.sepимеет значение false и, таким образом 0/0, вычисляется, вызывая ZeroDivisionErrorи завершая работу с ненулевым кодом выхода. На платформах, отличных от Windows, '['>os.sepэто правда, делает выражение 0/1, которое ничего не делает, и программа завершается с кодом выхода 0.

Сборка x86, 7 байт (вдохновлено ответом Рунеморо )

31 DB 89 D8 40 CD 80

Или же

xor ebx, ebx 
mov eax, ebx
inc eax
int 0x80

Описание

Прежде всего, мы установим eaxв 1(номер системного вызова для exit(int val)для Linux, FreeBSDи OSX). Затем мы будем вызывать шлюз прерывания, 0x80который является шлюзом системного вызова Linux, FreeBSDи OSX. Это приведет к выходу программы со статусом ebxкоторого 0( false).

В Windows int 0x80недопустимый гейт (он используется 2eкак гейт-системный шлюз) и может привести к сбою программы, что приведет к завершению с положительным кодом выхода ( true).

Изменить: не будет работать, OSXтак как он имеет другое соглашение о передаче аргументов на 32 бит (стека).

Ссылки и дальнейшее чтение

• FreeBSD - System Calls: Информация о системных звонках в FreeBSD.
• System calls in the Linux kernel. Part 2.: Отличная статья о системных вызовах Linux.
• Linux Syscall Reference: ссылка на номера системных вызовов для Linux.
• Windows Syscall Shellcode: Статья о прямых вызовах системных вызовов windowsиз сборки.
• Making system calls from Assembly in Mac OS X: Статья о системных вызовах OSX.

C, 44 43 38 36 байт

Спасибо @Downgoat за байт! ^{вычеркнуто 44 все еще регулярно 44}
Спасибо @Neil за два байта!

f(){return
#ifdef WIN32
!
#endif
0;}

PHP, 22 байта

`<?=PATH_SEPARATOR>":";`  

печатает, 1если разделитель пути является точкой с запятой (двоеточие или пустой для всех других ОС, кроме DOS и OS / 2), иначе ничего.

также 22 байта , но не так безопасно:

<?=strpos(__FILE__,92);

печатает положительное целое число, если путь к файлу содержит обратную косую черту; остальное ничего.
Безопасная альтернатива с 27 байтами : <?=DIRECTORY_SEPARATOR>"/";отпечатки 1или ничего.

Странная находка : <?=__FILE__[1]==":";( 20 байтов ) должна быть, тоже небезопасно, но хорошо. Но хотя и __FILE__претендует на то, чтобы быть строкой (я пробовал var_dumpи gettype), индексация выдает ошибку, если вы не скопируете ее куда-то еще (конкатенация также работает) или не используете ее в качестве параметра функции.

Редактировать:
<?=(__FILE__)[1]==":";(также 22 байта ) работает в PHP 7; но это потому, что скобки копируют значение константы во временную переменную.

27 байт : <?=stripos(PHP_OS,win)===0;
проверяет, PHP_OSначинается ли предопределенная константа с win(без учета регистра; Windows, WIN32, WINNT, но не CYGWIN или Darwin); печатает 1для Windows, иначе ничего.

17/18 байт :

<?=strlen("
")-1;

печатает, 1если он был сохранен с переводом строки Windows (также в DOS, OS / 2 и Atari TOS - хотя я сомневаюсь, что кто-нибудь когда-либо компилировал PHP для TOS), в противном случае 0.

Вы также можете проверить постоянную PHP_EOL.

больше опций:

PHP_SHLIB_SUFFIXнаходится dllна Windows, но не обязательно только там.
php_uname()возвращает информацию об операционной системе и многое другое; начинается с WindowsWindows.
$_SERVER['HTTP_USER_AGENT']будет содержать Windowsпри вызове в браузере на Windows.
<?=defined(PHP_WINDOWS_VERSION_BUILD);(38 байт) работает в PHP> = 5.3

заключение

Единственный отказоустойчивый способ узнать, действительно ли это Windows, а не что-то похожее на нее, похоже, проверка имени ОС. Для PHP: php_os()может быть отключен по соображениям безопасности; но PHP_OS, вероятно, всегда будет содержать нужную информацию.

Befunge-98, 7 байт

6y2%!.@

Попробуйте онлайн!

Это работает путем запроса разделителя системного пути, который есть \в Windows и /в других операционных системах.

6y            System information query: #6 returns the path separator.
  2%          Test the low bit - this will be 1 for '/' and 0 for '\'.
    !         Not the value, so it becomes 0 for '/' and 1 for '\'.   
     .@       Output the result and exit.

Mathematica, 28 байт

$OperatingSystem=="Windows"&

Java 8, 33 байта

Отдельное спасибо Оливье Грегуару за предложение separatorCharи Критиси Литосу за -1 байт!

Это лямбда-выражение, которое возвращает логическое значение. Это может быть назначено Supplier<Boolean> f = ...;и вызвано с f.get().

()->java.io.File.separatorChar>90

Попробуйте онлайн! - сервер не Windows, поэтому он печатаетfalse. Тем не менее, в моей машине Windows, тот же код печатаетtrue.

Этот код получает системный файловый разделитель и проверяет, больше ли его кодовая точка, чем символ [. Это верно для Windows, так как она используется \в качестве разделителя - но используется для любой другой ОС /, код которой в таблице ASCII ниже.

J 7 байт

6=9!:12

Это глагол (аналог функции), который использует встроенное внешнее соединение 9!:12для определения типа системы, где 5 - Unix, а 6 - Windows32.

R 15 байт

.Platform$O>"v"

Спасибо plannapus за предложение использовать частичное совпадение для извлечения элементов списка.

.Platform - это список с некоторыми деталями платформы, под которой был построен R. Существует элемент OS.type(единственный элемент с именем, начинающимся с «O»), который является символьной строкой, задающей операционную систему (семейство) компьютера. Один из "unix"или "windows".

Так "unix"меньше "v", но "windows"больше "v". Другие действительные 15-байтовые ответы

.Platform$O>"V"
.Platform$O>"w"
.Platform$O>"W"

R разрабатывается для операционных систем семейства Unix-like, Windows и Mac . Другие семейства ОС не поддерживаются.

Perl, 11 байт

print$^O=~MS

^O должен быть заменен буквальным Control-O.

Выходы 1на окнах, ничего на другой ОС.

Обратите внимание, что я не использую, так sayкак он добавляет завершающий перевод строки, что правда в Perl.

-2 байта благодаря primo. (и исправлены потенциальные проблемы)
-1 байт благодаря ais523.

юлия, 10 байт

is_windows

Функция, которая возвращает истину для окон

машинный код x86, 9 байт

40 39 04 24 75 02 CD 80 C3

Составлено из:

inc eax        ; set eax to 1
cmp [esp], eax ; check if [esp] == 1 (linux)
jne windows    ; jump over "int 0x80" if on windows
int 0x80       ; exit with exit code 0 (ebx)
windows:
ret            ; exit with exit code 1 (eax)

JavaScript, 42 30 26 25 байт

console.log((
//Begin
_=>navigator.oscpu[0]>'V'
//End
)())

Протестировано с Firefox. (Chrome не имеет oscpuсвойства.) Поскольку строчные буквы имеют более высокий код символа, чем заглавные буквы, это зависит от того, является ли первая буква navigator.oscpuзаглавной, а не W , X , Y или Z на любой платформе, поддерживаемой Firefox (кроме Windows, конечно). Согласно этому посту , это так.

Правки

1. Сохранено 12 байтов благодаря Нейлу .
2. Сохранено еще четыре байта
3. Сохранено еще один байт благодаря Blender .

C #, 61 48 байтов

()=>(int)System.Environment.OSVersion.Platform<4

Сохранено 13 байтов благодаря TheLethalCoder

Или полная программа на 83 байта:

class P{static int Main(){return(int)System.Environment.OSVersion.Platform<4?1:0;}}

Различные варианты Windows используют значения перечисления от 0 до 3 в реализации Microsoft .NET . 4 - Unix, 5 - Xbox [360] (который я не буду рассматривать как «Windows»), 6 - MacOSX. Mono использует те же значения , добавив 128 для Unix / Linux в более ранних версиях.

Следовательно, все, что <4, является Windows, а все остальное не Windows.

Пакетный, 50 байтов

@if %OS%==Windows_NT if not exist Z:\bin\sh echo 1

Изменить: Исправлено игнорировать DOS вместо того, чтобы утверждать, что это Windows.

Только другой способ я знаю, работает Batch вне Windows , заключается в использовании WINE , который по умолчанию будет отображать Z:в /. Поэтому, если Z:\bin\shсуществует, скорее всего /bin/sh, так, а не MS Windows.

Я не знаю, для чего WINE устанавливает% OS%, но если это не так, Windows_NTя мог бы сэкономить 23 байта.

QBasic, 31 байт

?INSTR(ENVIRON$("COMSPEC"),"W")

Печатает ненулевой под Windows, 0 под всем остальным.

COMSPECпеременная среды, уникальная для ОС Microsoft Указывает на интерпретатор команд, как правило, command.comили cmd.exe. Под Windows интерпретатор команд находится где-то в каталоге Windows; под MS-DOS он находится в каталоге DOS или в корне диска, а под любой другой ОС его не существует.

Проверяя, COMSPECсодержит ли значение «W», мы можем определить разницу между Windows и не-Windows.

Node.js, 27 16 15 13 байт

Спасибо @Patrick , который срезал 12 байт моего решения, используя REPL Node:

_=>os.EOL>`
`

Оригинальное решение:

_=>require('path').sep!='/'

Excel VBA, 41 40 30 29 26 24 байт

Функция непосредственного windows, которая возвращает, trueесли длина системного кода ОС превышает длину 3, потому что информация ограничена для вывода либо в противном случае, macлибо pcdosвозвращается trueтолько для окон ПК

?[Len(Info("SYSTEM"))>3]

Предыдущие версии

''# Ignore the second `"` that follows every `\` - its only there for highlighting 

?Left(Environ("OS"),1)="W"                 # 24 Bytes

?InStr(ThisWorkbook.Path,"\"")             # 29 Bytes

?Mid(ThisWorkbook.Path,3,1)="\""           # 30 Bytes, Restricted to local Files

?Application.PathSeparator="\""            # 30 Bytes

?Left(Application.OperatingSystem,1)="W"   # 40 Bytes

изменения

-1 Спасибо Нейлу за использование Left(...,1)болееMid(...,1,1)

-10 Спасибо ChrisH за указание на трюк с разделителем путей в Mego

-1 для проверки WorkbookPathдля "\" вместо того чтобы использоватьApplication.Path Separator

-4 Для переключения на Environ()

-2 для переключения на [Len(Info(...

Новое решение, 51 байт

Новая subподпрограмма, которая выводит в окно VBE немедленное окно 1 (truthy)под окнами и 0 (falsey)под Mac методом условной компиляции.

Sub a
i=1
#If Mac Then
i=0
#End If
Debug.?i
End Sub

Perl 6 ,  19  18 байт

put $*DISTRO.is-win

put ?($*CWD~~/\\/)

Оба выхода True␤или в False␤зависимости от системы, на которой он запущен.

APL (Дьялог) , 21 байт

'W'∊∊#⎕WG'APLVersion'

Попробуйте онлайн!

#⎕WG'APLVersion' Root ( # ) W indow G et property APL Version

∊ подключить

'W'∊ это W члена? (никакие не-Windows возвращаемые значения не содержат заглавных букв W)

tcl, 38 байт

 expr [lsearch $tcl_platform windows]>0

PHP 17 байт

Следующий выводит 1, если окна и ничего, если что-нибудь еще. Игнорирование уведомлений о преобразовании строк.

<?=PHP_OS==WINNT;

Попробуйте онлайн- тесты для Linux, потому что песочница - это Linux для PoC.

Java 8, 49 байт

()->System.getenv().get("OS").contains("Windows")

Дольше, чем другой ответ Java , но использует другой подход.

Эта лямбда вписывается в Supplier<Boolean>и может быть проверена с помощью следующей программы:

public class DetectMSWindows {

  public static void main(String[] args) {
    System.out.println(f(() -> System.getenv().get("OS").contains("Windows")));
  }

  private static boolean f(java.util.function.Supplier<Boolean> s) {
    return s.get();
  }

}

Haskell, 39 31 байт

import System.Info
f=os!!0=='m'

Я проверяю вывод первой буквы «m», которая должна быть «mingw» для windows. Насколько я могу судить, нет другой ОС, которая начинается с M. Информация поступает с https://github.com/ghc/ghc/blob/master/compiler/utils/Platform.hs.

bash + coreutils, 5 байт

rm $0

Также работает в большинстве других POSIXy оболочек. (Обратите внимание, что порты Windows существуют bashи rmсуществуют; хотя они обычно используются только в более тяжелых операционных системах POSIXy, это не совсем пустая запись.) Выводится через код выхода (0 = false, 1 = true). Может быть посчитано как 4 байта, если вы можете использовать имя файла (например rm a). Обратите внимание, что это может привести к сбою в случае очень странных имен файлов (которые rmбудут интерпретироваться как аргументы из-за отсутствия цитирования и, возможно, удалять файлы, которые вам интересны, поэтому я бы рекомендовал не запускать эту программу из файла со странным именем ).

Примечание: удаляет программу с диска как побочный эффект или, по крайней мере, пытается. В случае, когда мы работаем в Windows, ОС не сможет удалить запущенный файл (операция, которую Windows запрещает либо по умолчанию, либо с полной остановкой), и, таким образом, rmпроизойдет ошибка. bashловит ошибку и преобразует ее в код выхода (таким образом, программа в целом завершается нормально). Большинство других записей здесь используют 0 для фальси и 1 для истинного в кодах выхода, так что это делает то же самое; обратите внимание , что bash«s ifзаявление не принимает целые числа на всех (точнее, он принимает команды и филиалы , основанные на ли они работают, и арифметические тесты выполняются с помощью средств таких программ , какtestкоторые намеренно сообщают об «сбое» при неудачном сравнении), так что это более шаткое основание с точки зрения легальности, чем программы, которые выводят через код ifзавершения на языках, где 0 допустим в тесте операторов и отправляет программу в elseветку.

8 , 11 байт

 
os 1- not .
 

Печать trueна Windows, falseна Linux и MacOS. Другими платформами, поддерживаемыми 8-й, являются Android, iOS и Raspberry Pi, но я не могу их протестировать.

Беззвучная версия (с комментариями)

 
G:os  \ Return a number n indicating the operating system 
      \ 0 for Linux
      \ 1 for Windows 
      \ 2 for macOS
      \ 3 for Android 
      \ 4 for iOS 
      \ 5 for Raspberry Pi
n:1-  \ Subtract 1
G:not \ If Windows --> true, otherwise --> false
.     \ Print result
 

Python 3 (13 байт)

import winreg

Возвращает с нулевым кодом выхода (обычно это верно в оболочках), если в Windows, и с ненулевым кодом выхода в противном случае.

Если вы предпочитаете наоборот, есть решение 12 байт: import posix.

TrumpScript , 17 байт

America is great.

Попробуйте онлайн!

Эта программа, если она запускается в Windows, напечатает:

The big problem this country has is being PC

Это считается истинной ценностью.

Пустой вывод и следующее значение ложно:

Boycott all Apple products  until such time as Apple gives cellphone info to authorities regarding radical Islamic terrorist couple from Cal

Пустой вывод будет происходить в любой системе Linux (для этой программы), длинный ответ Apple, очевидно, происходит на Mac (для любой программы). В TIO бэкэнд (я предполагаю) - это операционная система Unix, так что вы можете получить только ложное значение; на моем компьютере я получаю сообщение ПК.

Не уверен на 100%, если это считается сообщением об ошибке (что приведет к аннулированию ответа), но если вы не знали об этом, это, вероятно, стоило посмеяться над вами.