Ada 언어 Cara 플젝에 Ruby 코드 사용하는 이유

나르시

2025.07.19 10:27:07

조회 74 추천 0 댓글 0

cloc 로 보겠습니다.

hodong@:~/projects/cada/src $ cloc .

19 text files.

17 unique files.

5 files ignored.

github.com/AlDanial/cloc v 2.04 T=0.01 s (1182.6 files/s, 87513.2 lines/s)

-------------------------------------------------------------------------------

Language files blank comment code

-------------------------------------------------------------------------------

Ada 14 133 186 720

Ruby 2 29 35 133

C 1 4 6 12

-------------------------------------------------------------------------------

SUM: 17 166 227 865

-------------------------------------------------------------------------------

이렇습니다.

루비 코드도 많이쓰죠.

웰까요.

소스코드 자동 생성 때문에 그렇습니다.

ㅎㅎㅎ

이런 식으로 코드 자동생성 ㅋㅋ

#!/usr/bin/env ruby

# frozen_string_literal: true

require 'fiddle/import'

# =============================================================================

# 1. C 라이브러리(libc)의 strerror 함수를 호출하기 위한 설정

# =============================================================================

module LibC

extend Fiddle::Importer

LIBC_PATH = case RUBY_PLATFORM

when /linux/

'libc.so.6'

when /darwin/ # macOS

'libc.dylib'

when /freebsd/

'libc.so.7'

else

'libc.so'

end

begin

dlload LIBC_PATH

extern 'char* strerror(int)'

rescue Fiddle::DLError => e

warn "Warning: Could not load libc. Cannot generate error messages."

warn "Details: #{e.message}"

# strerror를 찾을 수 없을 때 빈 함수를 정의하여 스크립트가 완전히 죽는 것을 방지

def self.strerror(errnum); "libc not found"; end

end

# =============================================================================

# 2. strerror 메시지를 Ada 예외 이름으로 변환하는 로직

# =============================================================================

def message_to_ada_name(message)

# 'Can't'/'can't' 같은 예외적인 단어들을 먼저 처리

processed_message = message.gsub(/can't/i, "cannot")

# 각종 구분자(공백, /, :, ., -)로 단어를 나누고, 빈 조각은 제거

parts = processed_message.split(/[ \/:.-]/).reject(&:empty?)

# 각 단어의 첫 글자를 대문자로 만들고 언더스코어(_)로 합침

return parts.map(&:capitalize).join('_')

end

input_file = ARGV[0]

unless input_file && File.exist?(input_file)

puts "Usage: #{$0} <path_to_errno_h.ads>"

exit 1

end

# 1. 'errno_h.ads' 파일을 읽어 문자열로 저장합니다.

file_contents = File.read(input_file)

# 2. 정규표현식으로 파일 내용에서 C 상수 이름과 숫자 값을 모두 찾아냅니다.

# 결과는 [["EPERM", "1"], ["ENOENT", "2"], ...] 형태의 배열이 됩니다.

c_constants = file_contents.scan(/^\s*(\w+)\s*:\s*constant\s*:=\s*(\d+);/)

# 3. 최종 결과를 담을 빈 배열을 준비합니다.

errors = {}

# 4. 찾아낸 각 상수 쌍([name, val])에 대해 반복 작업을 수행합니다.

c_constants.each do |name, val|

# 5. 숫자 값을 정수로 변환하고, strerror를 호출하여 메시지를 가져옵니다.

error_number = val.to_i

message = LibC.strerror(error_number).to_s

# 6. 메시지가 유효하지 않으면 스크립트를 중단시킵니다.

if message.nil? || message.empty? || message.start_with?('Unknown error')

raise "Invalid message for errno #{error_number}"

end

# 7. 메시지를 Ada 예외 이름 형식으로 변환합니다.

ada_name = message_to_ada_name(message)

# 8. 변환에 성공했다면, 모든 정보를 묶어서 최종 결과 배열에 추가합니다.

if ada_name

errors[val] = { c_name: name, ada_name: ada_name } if errors[val].nil?

end

# --- cada-error.ads 파일 생성 (추가된 부분) ---

File.open('cada-error.ads', 'w') do |f|

f.puts '-- -*- Mode: Ada; indent-tabs-mode: nil; c-basic-offset: 2; tab-width: 2 -*-'

f.puts '-- This file is generated by gen-cada-error.rb. DO NOT EDIT.'

f.puts '-- cada-error.ads'

f.puts '--'

f.puts '-- Permission to use, copy, modify, and/or distribute this software for any'

f.puts '-- purpose with or without fee is hereby granted.'

f.puts '--'

f.puts '-- THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES'

f.puts '-- WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF'

f.puts '-- MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR'

f.puts '-- ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES'

f.puts '-- WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN'

f.puts '-- ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF'

f.puts '-- OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.'

f.puts 'with Interfaces.C;'

f.puts

f.puts 'package Cada.Error is'

f.puts

errors.each_pair do |code, hash|

f.puts " #{hash[:ada_name].ljust(35)} : exception; -- #{hash[:c_name]}, #{code}"

end

f.puts

f.puts ' Unknown_Error : exception; -- For unhandled errno values'

f.puts

f.puts ' function get_error_message (Err_Code : Interfaces.C.Int) return String;'

f.puts

f.puts 'end Cada.Error;'

end

puts "Generated src/cada-error.ads successfully."

# =============================================================================

# 5. cada-error-raise_from_errno.adb (서브유닛) 파일 생성

# =============================================================================

File.open('cada-error-raise_from_errno.adb', 'w') do |f|

f.puts '-- This file is dynamically generated by gen-cada-error.rb. DO NOT EDIT.'

f.puts 'separate (Cada.Error)'

f.puts 'procedure raise_from_errno (err_code : Interfaces.C.Int; message : String := "") is'

f.puts ' final_message : constant String :='

f.puts ' (if message\'length > 0 then message else "OS Error");'

f.puts 'begin'

f.puts ' case err_code is'

errors.each_pair do |val, data|

f.puts " when #{val} => raise #{data[:ada_name]} with final_message;"

end

f.puts ' when others => raise Unknown_Error with final_message & " (errno: " & err_code\'image & ")";'

f.puts ' end case;'

f.puts 'end raise_from_errno;'

end

puts "Generated src/cada-error-raise_from_errno.adb successfully."

한가지 언어만 사용하지는 않아요.

ada, c/c++로 뭔가를 개발한다고 하여 동적 언어는 안 쓰겠거니 생각하면 큰 오산입니다.

고정닉 0

전체 댓글 0개

등록순 최신순 답글순

본문 보기

타인의 권리를 침해하거나 명예를 훼손하는 댓글은 운영원칙 및 관련 법률에 제재를 받을 수 있습니다.
Shift+Enter 키를 동시에 누르면 줄바꿈이 됩니다.

갤러리 리스트
번호	제목	글쓴이	작성일	조회	추천
설문	반응이 재밌어서 자꾸만 놀리고 싶은 리액션 좋은 스타는?	운영자	25/07/28	-	-
AD	휴대폰 액세서리 세일 중임!	운영자	25/07/28	-	-
2877292	졸리.. 졸리.. [1]	♥님아그다리를건너지마오쩌둥♥	08.02	35	0
2877288	흠.. 애널 아예 쉬는김에 글이나 쓸깡	♥님아그다리를건너지마오쩌둥♥	08.02	39	0
2877287	석열 이 디스했더니 차단당했다 옆갤에서	넥도리아(220.74)	08.02	38	0
2877286	아마존 Q 해킹 당했었구나	ㅆㅇㅆ(124.216)	08.02	34	0
2877285	이번에 중국 바이트댄스 오픈소스 보는데	ㅆㅇㅆ(124.216)	08.02	34	0
2877284	내가 느끼는 것은 한국 프로그래밍 커뮤니티는 배울게 없다 [1]	ㅆㅇㅆ(124.216)	08.02	56	2
2877282	나니무컨디션 ㅎㅌㅊ	♥님아그다리를건너지마오쩌둥♥	08.02	33	0
2877281	내란 세력 부패 척결 부패한 경찰관 척결 척사광이 와야함.	넥도리아(220.74)	08.02	19	0
2877280	받은 것도 받을 것도 없으며 또한	프갤러(220.84)	08.02	26	0
2877279	'나'의 자연적 수명은 끝난지 오래인데 말이에요 [1]	프갤러(220.84)	08.02	44	0
2877278	핵전쟁 [1]	♥님아그다리를건너지마오쩌둥♥	08.02	41	0
2877275	❤✨☀⭐⚡☘⛩나님 시작합니당⛩☘⚡⭐☀✨❤	♥님아그다리를건너지마오쩌둥♥	08.02	33	0
2877274	디코로 얼마전에 자주 가는 아키텍트 서버서 이야기하는데 [1]	ㅆㅇㅆ(124.216)	08.02	45	0
2877273	인지과학조져라 [1]	손발이시립디다	08.02	45	0
2877272	마우스 패드 없이 마우스 쓰는데	프갤러(110.10)	08.02	26	0
2877271	마우스 사이드 버튼이 너무 싫다	프갤러(110.10)	08.02	24	0
2877270	근데 진짜 신기하지 않냐 원리만 놓고보면 다 간단한데 저걸 저렇게	ㅆㅇㅆ(124.216)	08.02	44	0
2877269	1차 납품 준비 끝 [2]	ㅆㅇㅆ(124.216)	08.02	52	0
2877267	근데 저 기술을 해킹말고 역공학에써서	ㅆㅇㅆ찡	08.02	44	0
2877266	해킹하는 애들 댓글단거보니까 이렇다네 [2]	ㅆㅇㅆ찡	08.02	89	0
2877265	종합적으로 봤을때 네이버쪽에서 MSA 적용과정에서 문제 생긴거라 생각중 [2]	ㅆㅇㅆ(124.216)	08.02	65	1
2877264	근데 네이버도 저 수준이면 한국은 보안 의미없는거 아님? [2]	ㅆㅇㅆ찡	08.02	71	0
2877263	해킹하는 애들 머리 존나 좋긴하네 [5]	루도그담당(58.239)	08.02	96	0
2877262	이번에 원리 찾아봤는데 네이버쪽 API 설계 결함인듯	ㅆㅇㅆ(124.216)	08.02	84	0
2877261	아스카 밤샘작업 중 [2]	아스카영원히사랑해	08.02	57	0
2877260	아니 근데 네이버 저게 사실이면 저런 대기업도	ㅆㅇㅆ(124.216)	08.02	67	0
2877259	이번에 우왁굳인가? 걔네 이파리 ㅈㄴ 대단하네 [2]	ㅆㅇㅆ(124.216)	08.02	121	0
2877258	해킹 공부 너무재밌는데? [2]	루도그담당(58.239)	08.02	56	0
2877257	Ada 프로그래밍: 5.3 goto 문 [2]	나르시	08.02	65	0
2877255	내가 아주르로 읽는 이유=원어 존중 [5]	ㅆㅇㅆ(124.216)	08.02	50	0
2877253	챗 지피티 4.1 vs 지미니.. 프로 어떤게 [1]	존존	08.02	38	0
2877252	애저가 맞긴한데 아주르로 읽어도됨	ㅆㅇㅆ(124.216)	08.02	23	0
2877251	MS azure 는 아주르 아니고 "애저" 라고 읽는데 [6]	프갤러(183.101)	08.02	57	0
2877250	무릎 위엔 알몸녀, 전직 판사의 만취운전…30대 여성 코미디언 치여 사망	발명도둑잡기(118.216)	08.02	38	0
2877249	음기 충전	발명도둑잡기(118.216)	08.02	30	0
2877248	김기덕 감독 <수취인불명> 양동근	발명도둑잡기(118.216)	08.02	33	0
2877247	우리집 ㄱㄱㄱㄱ	프갤러(220.86)	08.02	112	1
2877246	멍유 2차흑화하면 닉 이걸로 바꾸냐? [1]	프갤러(119.71)	08.02	34	0
2877245	삼성의 펠티어 냉각 기술	발명도둑잡기(118.216)	08.02	84	0
2877244	드디어 아주르 아키텍쳐 패턴 다읽었다 [11]	ㅆㅇㅆ(124.216)	08.02	75	0
2877243	석열이햄 빤쓰쇼는 사실 뭐 할 수 있다고 보이긴함 [2]	ㅆㅇㅆ(124.216)	08.02	50	0
2877242	멍유가 저리 망가진것도 결국 나님 때문이겠지.. [7]	♥찢명아티스트냥덩♥	08.02	72	0
2877241	윤석열 빤스쇼 나도 보도싶구나 [1]	헬마스터	08.02	56	0
2877240	내일 아니 애널 뛰뛰 하려했는데 그냥 쉬어야할듯 [2]	♥찢명아티스트냥덩♥	08.02	44	0
2877239	내가 바라는 세상	발명도둑잡기(118.216)	08.02	21	0
2877238	..갔오? [1]	♥찢명아티스트냥덩♥	08.02	35	0
2877237	저딴 게 일국의 머통령이었다니 ㅋㅋㅋㅋ [1]	아스카영원히사랑해	08.02	66	0
2877236	3년뒤에 SRE로 직무 변경할건데 기술 스택 평가좀요	프갤러(153.246)	08.02	21	0
2877235	당신이 먹는것들이 곧 당신이당 By 나님 [1]	♥찢명아티스트냥덩♥	08.02	36	0
2877234	힘을 원하는가? [1]	♥찢명아티스트냥덩♥	08.02	38	0
뉴스	47세 전현무, 13살 어린 여배우와 ‘포착’…“나이차 얼마안나”	디시트렌드	08.02