jpayne@68: #
jpayne@68: # "raw" modem - phoneline
jpayne@68: #
jpayne@68: 
jpayne@68: pcm.!phoneline {
jpayne@68: 	@args [ CARD DEV ]
jpayne@68: 	@args.CARD {
jpayne@68: 		type string
jpayne@68: 		default {
jpayne@68: 			@func getenv
jpayne@68: 			vars [
jpayne@68: 				ALSA_MODEM_CARD
jpayne@68: 				ALSA_PCM_CARD
jpayne@68: 				ALSA_CARD
jpayne@68: 			]
jpayne@68: 			default {
jpayne@68: 				@func refer
jpayne@68: 				name defaults.pcm.modem.card
jpayne@68: 			}
jpayne@68: 		}
jpayne@68: 	}
jpayne@68: 	@args.DEV {
jpayne@68: 		type integer
jpayne@68: 		default {
jpayne@68: 			@func igetenv
jpayne@68: 			vars [
jpayne@68: 				ALSA_MODEM_DEVICE
jpayne@68: 			]
jpayne@68: 			default {
jpayne@68: 				@func refer
jpayne@68: 				name defaults.pcm.modem.device
jpayne@68: 			}
jpayne@68: 		}
jpayne@68: 	}
jpayne@68: 	@func refer
jpayne@68: 	name {
jpayne@68: 		@func concat
jpayne@68: 		strings [
jpayne@68: 			"cards."
jpayne@68: 			{
jpayne@68: 				@func card_driver
jpayne@68: 				card $CARD
jpayne@68: 			}
jpayne@68: 			".pcm.modem." $DEV ":CARD=" $CARD
jpayne@68: 		]
jpayne@68: 	}
jpayne@68: 	hint.show off
jpayne@68: }
jpayne@68: 
jpayne@68: #
jpayne@68: #  "autohooked" modem
jpayne@68: #
jpayne@68: 
jpayne@68: pcm.!modem {
jpayne@68: 	@args [ CARD DEV ]
jpayne@68: 	@args.CARD {
jpayne@68: 		type string
jpayne@68: 		default {
jpayne@68: 			@func getenv
jpayne@68: 			vars [
jpayne@68: 				ALSA_MODEM_CARD
jpayne@68: 				ALSA_PCM_CARD
jpayne@68: 				ALSA_CARD
jpayne@68: 			]
jpayne@68: 			default {
jpayne@68: 				@func refer
jpayne@68: 				name defaults.pcm.modem.card
jpayne@68: 			}
jpayne@68: 		}
jpayne@68: 	}
jpayne@68: 	@args.DEV {
jpayne@68: 		type integer
jpayne@68: 		default {
jpayne@68: 			@func igetenv
jpayne@68: 			vars [
jpayne@68: 				ALSA_MODEM_DEVICE
jpayne@68: 			]
jpayne@68: 			default {
jpayne@68: 				@func refer
jpayne@68: 				name defaults.pcm.modem.device
jpayne@68: 			}
jpayne@68: 		}
jpayne@68: 	}
jpayne@68: 	type hooks
jpayne@68: 	slave {
jpayne@68: 		pcm {
jpayne@68: 			@func concat
jpayne@68: 			strings [
jpayne@68: 				"cards.pcm.phoneline:CARD=" $CARD ",DEV=" $DEV
jpayne@68: 			]
jpayne@68: 		}
jpayne@68: 	}
jpayne@68: 	hooks.0 {
jpayne@68: 		type ctl_elems
jpayne@68: 		hook_args [
jpayne@68: 		{
jpayne@68: 			name "Off-hook Switch"
jpayne@68: 			preserve true
jpayne@68: 			value "on"
jpayne@68: 			lock false
jpayne@68: 			optional true
jpayne@68: 		}
jpayne@68: 		]
jpayne@68: 	}
jpayne@68: 	hint.show off
jpayne@68: }