Thử thách

Tạo một chương trình trả về giá trị trung thực khi chạy trên Microsoft Windows (để đơn giản, chúng tôi sẽ sử dụng Windows 7, 8.1 và 10) và giá trị falsey khi chạy trên bất kỳ hệ điều hành nào khác (OSX, FreeBSD, Linux).

Quy tắc

• Mã không chạy / biên dịch trên nền tảng không được tính là giá trị falsey.

Tiêu chí chiến thắng

Tôi gắn nhãn này là môn đánh gôn , vì vậy điểm số thấp nhất sẽ thắng, nhưng tôi cũng rất thích xem giải pháp sáng tạo cho vấn đề này.

Vim, 2 byte

<C-a>1

Trên Windows, <C-a>(ctrl + a) được ánh xạ theo mặc định Select All. Nếu bạn nhập a 1trong chế độ chọn trong Windows, nó sẽ thay thế lựa chọn bằng những gì bạn đã nhập (1) để lại 1 trong bộ đệm.

Trên các hệ điều hành khác, <C-a>theo mặc định được ánh xạ tới Increment number. Bởi vì không có số nào để tăng, đó là số không, và sau đó số 1 tăng số lượng nhưng về mặt bộ đệm là số không.

1 là sự thật trong Vim và một chuỗi trống là sai

MATLAB, 4 byte

ispc

Từ tài liệu :

tf = ispctrả về logic 1 (đúng) nếu phiên bản phần mềm MATLAB® dành cho nền tảng Microsoft® Windows®. Nếu không, nó trả về logic 0 (sai).

Ngoài ra còn có các chức năng ismacvà isunix. Tôi sẽ để nó cho người đọc tìm ra những chức năng đó làm gì. Mego vui lòng yêu cầu giải thích sơ đồ ismacvà isunixvì vậy tôi đã cố gắng minh họa nó ở đây:

Nó không được yêu cầu cho một sơ đồ ispcnhưng tôi có thể tiết lộ rằng hành vi này khá giống nhau, ngoại trừ thay thế OSXvà Unixvới Windows.

Cách tiếp cận thứ hai:

Đây là cách tiếp cận thứ hai với getenvviệc sử dụng 23 byte nên chống đạn, trừ khi có một hệ điều hành khác bắt đầu bằng W:

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

getenv 'name'tìm kiếm danh sách môi trường hệ điều hành cơ bản cho văn bản của biểu mẫu name=value, trong đó namelà vectơ ký tự đầu vào. Nếu được tìm thấy, MATLAB® trả về giá trị vectơ ký tự. Nếu tên được chỉ định không thể được tìm thấy, một ma trận trống được trả về.

Python 2.7.10 , 24 byte

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

Cảm ơn FlipTack cho 3 byte

Chương trình này lợi dụng thực tế rằng Windows là HĐH duy nhất được sử dụng \làm dấu tách đường dẫn. Thông thường điều này là bực bội và xấu, nhưng lần đầu tiên nó thực sự là một lợi thế. Trên Windows, '['>os.seplà sai và do đó 0/0được tính toán, gây ra ZeroDivisionErrorvà thoát với mã thoát khác không. Trên các nền tảng không phải của Windows, '['>os.seplà đúng, tạo biểu thức 0/1, không có gì và chương trình thoát với mã thoát 0.

Hội x86, 7 byte (Lấy cảm hứng từ câu trả lời của Runemoro )

31 DB 89 D8 40 CD 80

Hoặc là

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

Sự miêu tả

Trước hết, chúng tôi sẽ thiết eaxđể 1(số hệ thống gọi cho exit(int val)cho Linux, FreeBSDvà OSX). Sau đó, chúng tôi sẽ gọi cổng ngắt 0x80đó là hệ thống cửa khẩu kêu gọi Linux, FreeBSDvà OSX. Điều đó sẽ khiến chương trình thoát với trạng thái ebxlà 0( false).

Trên Windows int 0x80là một cổng không hợp lệ (Nó sử dụng 2enhư một cổng tòa nhà) và sẽ làm sập chương trình, khiến nó kết thúc bằng mã thoát tích cực ( true).

Chỉnh sửa: Sẽ không hoạt động OSXvì nó có quy ước chuyển đối số khác nhau trên 32 bit (theo ngăn xếp).

Tài liệu tham khảo và đọc thêm

• FreeBSD - System Calls: Thông tin về các cuộc gọi hệ thống trong FreeBSD.
• System calls in the Linux kernel. Part 2.: Một bài viết tuyệt vời về các cuộc gọi hệ thống của Linux.
• Linux Syscall Reference: tham chiếu số cuộc gọi hệ thống cho Linux.
• Windows Syscall Shellcode: Một bài viết về các cuộc gọi hệ thống gọi trực tiếp windowstừ lắp ráp.
• Making system calls from Assembly in Mac OS X: Một bài viết về các cuộc gọi hệ thống trên OSX.

C, 44 43 38 36 byte

Cảm ơn @Downgoat cho một byte! ^{gạch bỏ 44 vẫn là thường xuyên 44}
Cảm ơn @Neil cho hai byte!

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

PHP, 22 byte

`<?=PATH_SEPARATOR>":";`  

in 1nếu dấu phân cách đường dẫn là dấu chấm phẩy (dấu hai chấm hoặc trống cho tất cả các hệ điều hành khác ngoại trừ DOS và OS / 2), không có gì khác.

cũng 22 byte , nhưng không an toàn:

<?=strpos(__FILE__,92);

in một số nguyên dương nếu đường dẫn tệp chứa dấu gạch chéo ngược; không có gì khác
Một thay thế an toàn với 27 byte : <?=DIRECTORY_SEPARATOR>"/";in 1hoặc không có gì.

Một phát hiện lạ : <?=__FILE__[1]==":";( 20 byte ) nên, cũng không an toàn, nhưng ok. Nhưng mặc dù __FILE__giả vờ là một chuỗi (tôi đã thử var_dumpvà gettype), lập chỉ mục nó sẽ gây ra lỗi, trừ khi bạn sao chép nó ở một nơi khác (nối cũng hoạt động) hoặc sử dụng nó làm tham số hàm.

Chỉnh sửa:
<?=(__FILE__)[1]==":";(cũng 22 byte ) hoạt động trong PHP 7; nhưng đó là vì các dấu ngoặc đơn sao chép giá trị không đổi trong một biến tạm thời.

27 byte : <?=stripos(PHP_OS,win)===0;
kiểm tra nếu PHP_OShằng số được xác định trước bắt đầu bằng win(không phân biệt chữ hoa chữ thường; Windows, WIN32, WINNT, nhưng không phải CYGWIN hoặc Darwin); in 1cho Windows, không có gì khác.

17/18 byte :

<?=strlen("
")-1;

in 1nếu nó được lưu trữ với Windows linebreak (cũng trên DOS, OS / 2 và Atari TOS - mặc dù tôi nghi ngờ rằng bất kỳ ai đã từng biên dịch PHP cho TOS), khác 0.

Bạn cũng có thể kiểm tra hằng số PHP_EOL.

lựa chọn khác:

PHP_SHLIB_SUFFIXlà dlltrên Windows, nhưng không nhất thiết chỉ có ở đó.
php_uname()trả về thông tin trên hệ điều hành và hơn thế nữa; bắt đầu với WindowsWindows.
$_SERVER['HTTP_USER_AGENT']sẽ chứa Windowskhi được gọi trong trình duyệt trên Windows.
<?=defined(PHP_WINDOWS_VERSION_BUILD);(38 byte) hoạt động trong PHP> = 5.3

phần kết luận

Cách duy nhất không an toàn để biết nếu nó thực sự là Windows, không phải bất cứ thứ gì trông giống như vậy, dường như là một kiểm tra về tên hệ điều hành. Đối với PHP: php_os()có thể bị vô hiệu hóa vì lý do bảo mật; nhưng PHP_OScó lẽ sẽ luôn chứa thông tin mong muốn

Befunge-98, 7 byte

6y2%!.@

Hãy thử trực tuyến!

Điều này hoạt động bằng cách truy vấn trình phân tách đường dẫn hệ thống, \trên Windows và /trên các hệ điều hành khác.

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.

Toán học, 28 byte

$OperatingSystem=="Windows"&

Java 8, 33 byte

Đặc biệt cảm ơn Olivier Grégoire đã gợi ý separatorCharvà Kritixi Lithos cho -1 byte!

Đây là một biểu thức lambda trả về một boolean. Điều này có thể được chỉ định Supplier<Boolean> f = ...;và được gọi với f.get().

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

Hãy thử trực tuyến! - máy chủ không phải là windows, vì vậy bản in nàyfalse. Tuy nhiên, trong máy windows của tôi, cùng một mã intrue.

Những gì mã này làm là lấy bộ tách tệp của Hệ thống và kiểm tra xem mã của nó có lớn hơn ký tự không [. Điều này đúng với Windows, vì nó sử dụng \như bộ tách rời - nhưng mọi hệ điều hành khác đều sử dụng /, có mã thấp hơn trong bảng ASCII.

J, 7 byte

6=9!:12

Đây là một động từ (tương tự như một hàm) sử dụng kết hợp ngoại ngữ dựng sẵn 9!:12để có được loại hệ thống trong đó 5 là Unix và 6 là Windows32.

R, 15 byte

.Platform$O>"v"

Cảm ơn plannapus cho đề xuất sử dụng kết hợp một phần để trích xuất phần tử danh sách.

.Pl Platform là một danh sách với một số chi tiết về nền tảng mà R được xây dựng. Có một phần tử OS.type( phần tử duy nhất có tên bắt đầu bằng "O") là chuỗi ký tự, cung cấp cho Hệ điều hành (họ) của máy tính. Một trong "unix"hoặc "windows".

Như vậy "unix"là ít hơn "v", nhưng "windows"sau đó là lớn hơn "v". Các câu trả lời 15 byte hợp lệ khác là

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

R đang được phát triển cho các hệ điều hành giống như Unix, Windows và Mac . Các họ hệ điều hành khác không được hỗ trợ.

Perl, 11 byte

print$^O=~MS

^O nên được thay thế bằng Control-O theo nghĩa đen.

Đầu ra 1trên windows, không có gì trên hệ điều hành khác.

Lưu ý rằng tôi không sử dụng sayvì nó thêm một dòng mới, đó là sự thật trong Perl.

-2 byte nhờ vào primo. (và các sự cố tiềm ẩn đã được sửa)
-1 byte nhờ ais523.

julia, 10 byte

is_windows

Một hàm trả về true cho windows

mã máy x86, 9 byte

40 39 04 24 75 02 CD 80 C3

Tổng hợp từ:

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 byte

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

Đã thử nghiệm với Firefox. (Chrome không có thuộc oscputính.) Vì các chữ cái viết thường có mã ký tự cao hơn chữ in hoa, điều này phụ thuộc vào chữ cái đầu tiên navigator.oscpulà chữ hoa và không phải là W , X , Y hoặc Z trên bất kỳ nền tảng nào mà Firefox hỗ trợ (trừ Windows, tất nhiên). Theo bài đăng này , đó là trường hợp.

Chỉnh sửa

1. Đã lưu 12 byte nhờ Neil .
2. Đã lưu bốn byte khác
3. Đã lưu một byte khác nhờ Blender .

C #, 61 48 byte

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

Đã lưu 13 byte nhờ TheLethalCoder

Hoặc một chương trình đầy đủ ở 83 byte:

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

Các biến thể Windows khác nhau sử dụng giá trị enum từ 0 đến 3 trong triển khai Microsoft .NET . 4 là Unix, 5 là Xbox [360] (mà tôi sẽ không coi là "Windows"), 6 là MacOSX. Mono sử dụng các giá trị tương tự , thêm 128 cho Unix / Linux trong các phiên bản trước.

Do đó, mọi thứ <4 là Windows và mọi thứ khác không phải là Windows.

Mẻ, 50 byte

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

Chỉnh sửa: Đã sửa lỗi bỏ qua DOS thay vì cho rằng đó là Windows.

Cách khác duy nhất tôi biết để chạy Batch bên ngoài Windows là sử dụng WINE mà theo mặc định sẽ ánh xạ Z:tới /. Do đó, nếu Z:\bin\shcó, rất có thể là /bin/shvậy, không phải MS Windows.

Tôi không biết WINE đặt% OS% thành gì, nhưng nếu không Windows_NTthì tôi có thể tiết kiệm 23 byte.

QBasic, 31 byte

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

In khác không trong Windows, 0 dưới mọi thứ khác.

COMSPEClà một biến môi trường duy nhất cho hệ điều hành Microsoft. Nó trỏ đến trình thông dịch lệnh, thường command.comhoặc cmd.exe. Trong Windows, trình thông dịch lệnh nằm ở đâu đó trong thư mục Windows; trong MS-DOS, nó nằm trong thư mục DOS hoặc trên thư mục gốc của đĩa và dưới bất kỳ HĐH nào khác, nó không tồn tại.

Bằng cách kiểm tra xem giá trị của COMSPECcó chứa "W" hay không, chúng ta có thể biết sự khác biệt giữa Windows và không phải Windows.

Node.js, 27 16 15 13 byte

Cảm ơn @Patrick , người đã loại bỏ 12 byte khỏi giải pháp của tôi bằng REPL của Node:

_=>os.EOL>`
`

Giải pháp ban đầu:

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

VBA Excel, 41 40 30 29 26 24 byte

Chức năng cửa sổ ngay lập tức trả về truenếu mã hệ điều hành của hệ thống khởi động dài hơn độ dài 3, vì thông tin bị hạn chế ở đầu ra machoặc pcdosđiều này truechỉ trả về trên các cửa sổ máy tính

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

Những phiên bản trước

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

Thay đổi

-1 Cảm ơn Neil đã sử dụng Left(...,1)hơnMid(...,1,1)

-10 Cảm ơn ChrisH đã chỉ ra Thủ thuật phân tách đường dẫn của @ Mego

-1 Ví Kiểm tra WorkbookPathcho "\" hơn là sử dụngApplication.Path Separator

-4 Để chuyển sang Environ()

-2 Để chuyển sang [Len(Info(...

Giải pháp mới, 51 byte

subThói quen tiểu thuyết xuất ra, đến cửa sổ VBE ngay lập tức, 1 (truthy)dưới cửa sổ và 0 (falsey)dưới mac theo phương pháp biên dịch có điều kiện.

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

Perl 6 ,  19  18 byte

put $*DISTRO.is-win

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

Cả hai đầu ra True␤hoặc False␤tùy thuộc vào hệ thống mà nó được chạy.

APL (Dyalog) , 21 byte

'W'∊∊#⎕WG'APLVersion'

Hãy thử trực tuyến!

#⎕WG'APLVersion' Root ( # ) W indow G et property Phiên bản APL

∊ tranh thủ (làm phẳng)

'W'∊ là W là thành viên? (không có giá trị trả về không phải của Windows có chứa vốn W)

tcl, 38 byte

 expr [lsearch $tcl_platform windows]>0

PHP 17 byte

Sau đây sẽ xuất 1 nếu windows và không có gì nếu có gì khác. Bỏ qua các thông báo về sự hội tụ chuỗi.

<?=PHP_OS==WINNT;

Hãy thử trực tuyến các bài kiểm tra trực tuyến cho linux vì hộp cát là linux cho PoC.

Java 8, 49 byte

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

Dài hơn câu trả lời Java khác , nhưng có một cách tiếp cận khác.

Lambda này phù hợp với một Supplier<Boolean>và có thể được thử nghiệm với chương trình sau đây:

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 byte

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

Tôi kiểm tra đầu ra chữ cái đầu tiên của "m", đó là "mingw" cho các cửa sổ. Theo như tôi có thể nói, không có hệ điều hành nào khác bắt đầu bằng M. Thông tin đến từ https://github.com/ghc/ghc/blob/master/compiler/utils/Pl platform.hs

bash + coreutils, 5 byte

rm $0

Cũng hoạt động trong hầu hết các vỏ POSIXy khác. (Lưu ý rằng các cổng Windows tồn tại bashvà rmmặc dù chúng thường chỉ được sử dụng với các hệ điều hành POSIXy nặng nề hơn, nhưng đây không phải là một mục hoàn toàn trống.) Đầu ra thông qua mã thoát (0 = false, 1 = true). Có thể được tính là 4 byte nếu bạn được phép giả sử tên tệp (ví dụ rm a). Lưu ý rằng điều này có khả năng thất bại trong trường hợp tên tệp rất kỳ lạ ( rmsẽ diễn giải thành đối số do thiếu trích dẫn và có thể xóa các tệp bạn quan tâm, vì vậy tôi khuyên bạn không nên chạy chương trình này từ một tệp có tên lạ ).

Lưu ý: xóa chương trình khỏi đĩa dưới dạng tác dụng phụ hoặc ít nhất là cố gắng. Trong trường hợp chúng tôi đang chạy trên Windows, HĐH sẽ không xóa tệp đang chạy (một thao tác mà Windows không tuân theo mặc định hoặc dừng hoàn toàn) và do đó rmsẽ xảy ra lỗi. bashbắt lỗi và chuyển đổi nó thành một mã thoát (do đó toàn bộ chương trình chấm dứt bình thường). Hầu hết các mục khác ở đây đang sử dụng 0 cho falsey và 1 cho sự thật trong mã thoát, vì vậy điều này cũng tương tự; lưu ý rằng bash's iftuyên bố không chấp nhận số nguyên ở tất cả (đúng hơn, nó chấp nhận lệnh , ngành dựa trên việc họ chạy thành công, và kiểm tra số học được thực hiện thông qua các phương tiện của các chương trình nhưtestđã cố tình báo cáo "sự cố" khi so sánh không thành công), vì vậy đây là vấn đề về tính hợp pháp so với các chương trình xuất qua mã thoát trong các ngôn ngữ trong đó 0 là hợp lệ trong ifkiểm tra câu lệnh và gửi chương trình đến elsechi nhánh.

8 , 11 byte

 
os 1- not .
 

In truetrên Windows, falsetrên Linux và macOS. Các nền tảng khác được hỗ trợ bởi 8 là Android, iOS và Raspberry Pi, nhưng tôi không thể thử nghiệm chúng.

Phiên bản Ungolfed (có ý kiến)

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

import winreg

Trả về với mã thoát bằng 0 (thường là đúng trong shell) nếu trên windows và với mã thoát khác không.

Nếu bạn thích nó theo cách khác, có một giải pháp 12 byte : import posix.

TrumpScript , 17 byte

America is great.

Hãy thử trực tuyến!

Chương trình này, nếu chạy trên windows, sẽ in:

The big problem this country has is being PC

Đây được coi là một giá trị trung thực.

Đầu ra trống và giá trị sau là sai lệch:

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

Đầu ra trống sẽ xảy ra trên bất kỳ hệ thống linux nào (đối với chương trình này), phản hồi táo dài rõ ràng xảy ra trên Mac (đối với bất kỳ chương trình nào). Trên TIO, phần phụ trợ (tôi giả sử) là một hệ điều hành Unix, vì vậy bạn chỉ có thể nhận được giá trị giả; trên máy tính của tôi, tôi nhận được tin nhắn PC.

Không chắc chắn 100% nếu điều này được tính là một thông báo lỗi (sẽ làm mất hiệu lực câu trả lời), nhưng nếu bạn không biết về điều này thì có lẽ đáng để bạn cười.